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This reference publication describes to programmers 
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Control Statement Information 

Some basic terirdnology is used when 
illustrating control statements. 

1. A. parameter is a variable vrith its 
identifying character that is given a 
constant value for a specific purpose 
(i.e. . . . ,Sx, . . . vvhere Sx is a 
parameter possibly within a string of 
parameters, S being the identifier and 
X the variable) . 

2. DASD means a Direct Access Storage 
Device such as a disk or data cell 
drive. 

3. Uppercase letters and punctuation 
marks represent inforiration that rrust 
be coded exactly as shown. 

4. Lowercase letters represent 
information that must be supplied by 
the programmer. The letter b always 
indicates one blank space. Fcr 
parameter variables, lowercase letters 
represent constants that must be 
supplied and the lowercase x 
represents an optional parameter. 

5. Options contained within braces { } 
represent alternatives, one of which 
must be chosen. 

6. An ellipsis (a series of three 
periods) indicates that a variable 
number of items may be included. 



7. All references to disk refer to the 
IBM 2311 and IBM 2314 and 2319 unless 
otherwise stated. 



Supplementary Reading References 



The reader is directed to the following SRL 
publications for supplementary reference: 



DISK OPERATING SYSTEM 

DQ§_glJgggyisor and I/O Macros, GC24-5037 . 
D OS D at a Ma nagement Concepts , GC2U-3427. 
DOS Syst em Gen er ation , GC24-5033. 
DOS M ess ages, GC 24- 5 07 4. 

TAPE OPERATING SYSTEM 

IBM_Systeni/36 0_Tape_Oeeratin2_SYStem., 
S upervisor and Input/Out put Macros , 
GC24-5035. 

IBM_SYStem/36 0_Ta2e_pperatin2_Systern^_Data 
Management Concepts, GC24-3430. 

IBM_Sy stem/3 6 Tape Operat ing System^ 
Syst em G eneration and M ainten ance , 
GC24-5012. 
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Introduction 



Whatever the specific uses of a data SPECIAL- PURPOSE UTILITY PROGRAMS 

processing systein, certain unique 

operations exist that must be performed ^ssi3n_Alternate_Track-Data_Cell assigns an 

frequently. These operations may differ in alternate track when a track has proven 

detail, depending on the particular machine defective. 

configuration and data format for the 

individual user, but the essential function Assig n A lte rnate Track-Disk assigns an 

remains the same. Generalized routines alternate track when a track has proven 

designed to satisfy specific functions defective. 

would ease the burden of programming these 

operations. These routines must be Clear Data Cell clears one or more areas of 

flexible enough, however, to allow the user a data cell and establishes preformatted 

to assign the specifications of his tracks. 

particular problem. 

Clear_Disk clears one or more areas of a 

One type of program that meets these disk and establishes preformatted tracks, 
requirements are utility programs. They 

are designed to assist the user in CO£Y_and_Restore-Disk_to_Card^_Co2_y_and 

day-to-day operation of his installation. ggg tore- Disk or Da ta Cell to Tapej^_and 

With these programs the user can perform Copy-Dis k to Disk copy an entire file or 

certain frequently required operations, volume onto the specified media and restore 

such as transferring disk-storage files to the file or volume to its original media, 
cards or tape and printing out areas of 

tape or disk for program-testing purposes. I ni tiali ze Data Cell initializes data cells 

without programming effort. and does surface analysis on them. 

_- . , Initialize Disk initializes a disk pack and 

Description does surface analysis on it. 

Two groups of programs are described in Init ial iz e T ape initializes tapes with IBM 

this publication. The first group, the cr ANSI standard volume labels, 
file-to-file utility programs, transfers 
the contents of a single file from an input 
medium to an output medium. The second 
group, the special-purpose utility 
programs, performs a particular function 
not likely to be used every day. 



Tape Compare compares two files from two or 
more tapes to ensure that the files are 
identical. 



VTOC Di splay displays the volume table of 
contents of one disk pack. 



FILE-TO-FILE UTILITY PROGRAMS 

Seventeen file-to-file programs can 
transfer files from input mediums to output 
mediums. These programs are: 



All thirty programs described are disk 
resident. Six of these disk resident 
utilities, however, are also available as 
tape resident utilities. These utilities 
are: 



Card to Disk 

Card to Printer and/or Punch 

Card to Tape 

Data Cell to Data Cell 

Data Cell to Disk 

Data Cell to Printer 

Data Cell to Tape 

Disk to Card 

Disk to Data Cell 

Disk to Disk 

Disk to Printer 

Disk to Tape 

Tape to Card 

Tape to Data Cell 

Tape to Disk 

Tape to Printer 

Tape to Tape 



Card to Printer and/or Punch 

Card to Tape 

Tape to Card 

Tape to Printer 

Tape to Tape 

Tape Compare 

If the function of a disk resident and a 
tape resident utility function is 
identical, only one description is given. 



COMMON CHARACTERISTICS 

Each utility program handles a particular 
type of job. A symbolic assembly is not 
necessary for the operation of the program. 
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The utility programs process either 
consecutive or split-cylinder type files. 
For more information on these file 
arrangements, see the BOS_SU£ervisor_and 
I/O Macros publication listed in the 
preface. Output records from sequential 
files (consecutive or split-cylinder) 
produced by the System/360 Operating System 
can be processed by these utility programs, 
but these records must not be printed and 
punched. 

Indexed sequential files are not 
generally supported by these utility 
programs. The only exceptions are noted in 
the disk-to-printer and the copy/restore 
programs. 

All utility control cards shovin in this 
publication begin i^^ith // in the first two 
columns, hovvever, ./ is also acceptable. 

To handle a specific job, the 
generalized program is modified by utility 
control cards. Control cards for all 
programs (except initialize tape) are 
free-form in that optional parameters can 
be punched in any order. The programs 
assume default values for ircst options when 
a choice is not indicated in a utility 
control card. 

Control information is specified in a 
similar manner for all programs. When the 
same device is used with different 
programs, the control information related 
to the device is similar for all programs. 
Label handling and the control infcrmation 
related to input and output device 
assignment and description are compatible 
with IBM Disk and Tape Operating Systems 
IOCS. 



Machine Requirements 

The minimum roachine configuration required 
for thesn: programs is an IBM Systen/360 or 
System/370 central processing unit with 16K 
bytes of main storage, however, the tape 
compare program requires 24K bytes of main 
storage. For control statement loading use 
one of these machines: 

IBM 2520 Card Read Punch 

IBM 2540 Card Read Punch 

IBM 1442 Card Reader 

IBM 2501 Card Reader 

IBM 2311 Disk Storage Drive 

IBM 2314 Direct Access Storage Facility 

IBM 2319 Disk Storage 

IBM 2400 Series Magnetic Tape Unit 

IBM 3420 Magnetic Tape Unit* 

For program residence use one of these 
machines: 



IBM 2311 Disk Storage Drive 

IBM 2314 Direct Access Storage Facility 

IBM 2319 Disk Storage 

IBM 24 00 Series Magnetic Tape Unit 

For program operation, input/output devices 
are required by the specific program. 
Supported devices include: 

IBM 1442 Card Read Punch 

-rT-i«;i OCOA /-i-^ 3 

XJDi'J _ - . 

IBM 
IBM 
IBM 
IBM 
IBM 
IBM 
IBM 
IBM 
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IBM 
IBM 
IBM 

IBM 



2540 Card Read Punch 

25 01 Card Reader 

2321 Data Cell Drive 

2311 Disk Storage Drive 

2314 Direct Access Storage Facility 

2319 Disk Storage 

14 03 Printer 

1404 Printer (continuous-forms printing 

only) 

1443 Printer 

3211 Printer (no optional features) 

2400 Series Magnetic Tape Unit (with or 

without the 7-track feature) 

3420 Magnetic Tape Unit* 



IBM 


2311 


IBM 


2314 


IBM 


2319 


IBM 


1403 


IBM 


1404 


IBM 


1443 


IBM 


3211 


IBM 


1052 


IBM 


2400 


IBM 


3420 



Note: For Copy and Restore Disk to Tape 
with the 7-track feature, the data 
conversion feature is required. 

For logging and error messages use one of 
these machines: 



Disk Storage Drive 

Direct Access Storage Facility 

Disk Storage 

Printer 

Printer (continuous forms only) 

Printer 

Printer (no optional features) 

Printer -Keyboard 

Series Magnetic Tape Unit 

Magnetic Tape Unit* 



Control Statements 

JOB CONTROL 

Job control statements related to channel 
and unit assignment, label processing, and 
physical-device description are used with 
the utility programs. For information on 
job control statements see the System 
Control_and_Service publications as listed 
on the front cover of this publication. 
The required job control statements for 
running each of these programs are given in 
Figure 1; the entries for specific fields 
unique to the utility programis are shown in 
Figure 2. The new simplified job control 
label cards are used in job control input 
stream examples throughout this 
publication. 

* Note : 3420 support is provided only to a 
level equal to that of the 2400 series. 
This means that only 6 bytes of sense infor- 
mation are available, instead of the full 20, 
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FILE TO FILE 
PROGRAMS 


ASSIGN ALTERNATE TRACK- 
DISK OR DATA CELL, INI- 
TIALIZE DISK OR DATA CELL, 
INITIALIZE TAPE 


CLEAR DISK, 
CLEAR DATA CELL 


COPY AND RESTORE 
DISK OR DATA CELL 
PROGRAMS 


TAPE COMPARE 


VTOC DISPLAY 


JOB 


Required 


Required 


Required 


Required 


Required 


Required 


LBLTYP 


Required for 
link edit if 
tope label 
checking. 


Not Used 


Not Used 


Required for link edit 
if tape label checking 
or copying an NSD 
file. 


Not Used 


Required if output 
is labeled tape. 


TLBL 


Required if 
tape label 
processing. 


Not Used 


Not Used 


Required if tape label 
processing. 


Not Used 


Required if output 
is labeled tape. 


DLBL 


Required for 
DASD files. 


Not Used 


Required for DASD 
files. 


Required for copy file 
and restore functions. 
Not used for copy 
volume function. 


Not Used 


Required if output 
is disk. 


EXTENT 


Required for 
DASD. 


Not Used 


Required for 
DASD. 


Required for copy file 
and restore functions. 
Not used for copy 
volume function. 


Not Used 


Required if output 
is disk. 


ASSGN 


Required if 
devices are 
different 
than those 
at IPL time. 


Required if devices are 
different than those at IPL 
time. 


Required if devices 
are different than 
those at IPL time. 


Required if devices 
are different than 
those at IPL time. 


Required if 
devices ore 
different than 
those at IPL time. 


Required if devices 
are different than 
those at IPL time. 


UPSI 


Optional 


Required for System/360 
Model 30 and Model 40 
Emulators (program numbers 
EU484, EU485) and for 
System/370 Emulators of 1401, 
1440, 1460, and 1410/7010 
programs (program number 
EU490) when initializing disk. 


Required for 
System/360 Model 
30 and 40 Emulators 
(program numbers 
EU484, EU485) and 
for System/370 
Emulators of 1401, 
1440, 1460, and 
1410/7010 
programs (program 
number EU490) 
when clearing 
cylinder 200 of a 
disk. 


Optional 


Optional 


Not Used 


EXEC 


Required 


Required 


Required 


Required 


Required 


Required 


/* 


Required for 
card input 
programs.* 


Used only if update 
records are present. 


Not Used 


Not Used 


Not Used 


Not Used 


/& 


Required 


Required 


Required 


Required 


Required 


Required 


* This card must immediately follow the data cards for card input programs. In addition card columns 3-80 of the card must be entirely blank, 
otherwise the card will be ignored and treated as data. 



Figure 1. Job Control Statements Used in Each Program 



LINKAGE EDITOR 

When a program has not been cataloged in 
the core image library, the link editing 
phase must be performed. For detailed 
explanations of the linkage editor, see the 
System Control and Service publications 
listed on the front cover of this 
publication. For applicable linkage editor 
job control statements, refer to the S;^stem 
G eneratio n publications listed in the 
preface of this publication. 



All programs are loaded into main 
storage by the system loader. The programs 
may be link-edited to be executed in the 
background area or in a batched- job 
foreground area. The one exception is the 
initialize data cell program which will not 
run in the foreground if the multiple cells 
option is to be used. 



When file-to-file programs are cataloged 
in the core image or relocatable library, 
the phase or module names must be used. 
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FILE TO FILE 
PROGRAMS 


ASSIGN ALTER- 
NATE TRACK 
DISK OR DATA 
CELL, INITIALIZE 
DISK OR DATA 
CELL OR TAPE 


CLEAR DISK, 
CLEAR DATA 
CELL 


COPY AND 
RESTORE DISK OR 
DATA CELL 
PROGRAAAS 


TAPE 
COMPARE 


VTOC 
DISPLAY 


Filename 
aLBLorDLBL) 


UIN for input 
file. 

UOUT for 
output file. 


Not Used 


UOUT 


UIN for input 
devices. UOUT 
for output devices. 
UCHKPT for 
1 dueled check- 
point file. 


Not Used 


UOUT 


ASSGN Device 
for Logging 
Operator Messages 


SYS LOG 


SYS LOG 


SYS LOG 


SYS LOG 


SYS LOG 


SYS LOG 


ASSGN Utility 
Control Statement 
Input Device 


SYSIPT 


SYSIPT 


SYSIPT 


SYSIPT 


SYSIPT 


Not Used 


ASSGN Device 
for Logging 
Programmer 
Messages 


SYSLST 


SYSLST 

(not applicable 
to Initialize 
Tape) 


SYSLST 


SYSLST 


SYSLST 


Not Used 


ASSGN Primary 
Tape and Card, 
Ir^ut and Alternate 
Tape Input 


SYS004 


Not Used 


NotUed 


SYS004 


SYS004 


Not Used 


ASSGN Primary 
Tape and Printer 
Output and Altera 
note Tape Output 


SYS005 


For Initialize 
Tope only: 
SYSOOO required 
SYS001-SYS015 
optional 


Not Used 


SYS005 


SYS005 


SYS005 


ASSGN Linkage 
Editor * 


SYSLNK 
SVSOOl 
SYS0Q2 ** 


SYSLNK 
SYSOOl 


SYSLNK 
SYSOOl 


SYSLNK 
SYSOOl 


SYSLNK 
SYSOOl 
SYS002 ** 


SYSLNK 
SYSOOl 


ASSGN Private 
Core Image 
Library ***** 


SYSCLB 


SYSCLB 


SYSCLB 


SYSCLB 


SYSCLB 


Not Used 


ASSGN Caid 
Output Device 


SYS006 


Not Used 


Not Used 


SYS006 


Not Used 


Not Used 


ASSGN DASD 
Input and/jf 
Output Device *** 


SYSOOO- 
SYSnnn 


SYSOOO 


SYSOOO- 
SYSnnn 


SYSOOO- 
SYSnnn **** 


Not Used 


SYS004 
SYS005 



*** 
**** 
It**** 



* This programmer unit is available when not in use by the linkage editor. 
** This unit is needed for TOS only. 

SYSnnn con be no greater than the greatest physical unit block assigned and must not conflict with the assignment of any other device. 

SYS004 is required for the copy volume function. 

SYSCLB is required when link-editing to or executing from a private core image library. 



Figure 2. Job Control Stateirent File Naires and Assignments 
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Figure 3 gives the phase and module names 
required when link-editing the file-to-file 
utility prograiris. Each of the 17 programs 
is contained in five phases. Phases 2 
(module name IJWGEN) and 5 (module name 
IJWLAB) are the same for all programs and 
need only be loaded in two relocatable 
modules. Figure 4 gives the phase and 
module names for the special-purpose 
utility programs. The PHASE card must be 
omitted when using a book name to link-edit 
the special-purpose utilities (exception, 
see tape compare program) . See Appendix A 
for the contents of the modules for all 
utility programs. 



The following are sample control 
statements that can be used to execute a 
program. A typical example of the control 
cards used when executing a tape-to-tape 
program that is resident in the relocatable 
library is : 



//bJOB 

user-defined job name. 

//bASSGN 

assigns the input and output devices. 



//bOPTION LINK 

indicates that the program is to oe 
link-edited. 

bINCLUDE IJWTT 

identifies the tape-to-tape modules to 
be link-edited. 

bPHASEbTPTPS , IJWTTCS2 , NOAUTO 

gives the name of the last phase of 
the program and the main-storage 
address where it is to be loaded by 
using the operand in the previous 
control card followed by CS2. 

bINCLUDE IJWLAB 

link-edits the dummy label module. If 
the operand is omitted from this 
statement, the text of the user's 
routine must be present on SYSIPT and 
followed by the /* statement. (If 
SYSRDR and SYSIPT are the same device, 
the user's routine must be inserted 
after this INCLUDE statement.) If a 
user's routine is supplied from the 
relocatable library, that module's 
unique name must be entered in place 
of the IJWLAB operand. (Note: This 
card is not used with special-purpose 
utilities. ) 



PROGRAM 


PHASE NAMES 1 THROUGH 5 


MODULE NAMES \ TOS \ DOS 


Card to Disk 


CDDK-CDDK2-CDDK3-CDDK4-CDDK5 


IJWCD-IJWCDl-IJWGEN-iJWCD3-IJWCD4-IJWLAB [ [ IJJCPDO 


Card to Printer ancl/or Punch 


CDPP-CDPP2-CDPP3-CDPP4-CDPP5 


IJWCP-IJWCP1-1JWGEN-IJWCP3-1JWCP4-IJWLAB |IJJCPO| IJJCPDO 


Card to Tape 


CDTP-CDTP2-CDTP3-CDTP4-CDTP5 


IJWCT-lJWCTl-IJWGEN-iJWCT3-IJWCT4-IJWLAB ilJJCPO; IJJCPDO 


Data Cell to Data Cell 


DCDC- DCDC2- DCDC3- DCDC4- DCDC5 


IJWMM-IJWMM1-IJWGEN-IJWDD3-IJWDD4-IJWLAB; | IJJCPDO 


Data Cell to Disk 


DCDK-DCDK2-DCDK3-DCDK4-DCDK5 


IJWMD-1JWMD1-1JWGEN-IJWDD3-IJWDD4-IJWLAB i i IJJCPDO 


Data Cell to Printer 


DCPR-DCPR2-DCPR3-DCPR4-DCPR5 


1JWMP-IJWMP1-IJWGEN-IJWDP3-IJWDP4-IJWLAB | [ IJJCPDO 


Data Cell to Tape 


DCTP-DCTP2-DCTP3-DCTP4-DCTP5 


IJWMT-IJWMT1-IJWGEN-IJWDT3-IJWDT4-IJWLAB . j IJJCPDO 


Disk to Card 


DKCD-DKCD2-DKCD3-DKCD4-DKCD5 


1JWDC-IJWDC1-IJWGEN-IJWDC3-IJWDC4-IJWLAB ! I IJJCPDO 


Disk to Data Cell 


DKDC-DKDC2-DKDC3-DKDC4-DKDC5 


IJWDM-IJWDM1-IJWGEN-IJWDD3-IJWDD4-IJWLAB \ \ IJJCPDO 


Disk to Disk 


DKDK-DKDK2-DKDK3-DKDK4-DKDK5 


IJWDD-IJWDD1-IJWGEN-IJWDD3-IJWDD4-1JWLAB [ [ IJJCPDO 


Disk to Printer 


DKPR-DKPR2-DKPR3-DKPR4-DKPR5 


IJWDP-IJWDP1-IJWGEN-IJWDP3-IJWDP4-IJWLAB J ; IJJCPDO 


Disk to Tape 


DKTP-DKTP2-DKTP3-DKTP4-DKTP5 


IJWDT-IJWDT1-IJWGEN-IJWDT3-IJWDT4-IJWLAB I ' IJJCPDO 


Tape to Card 


TPCD-TPCD2-TPCD3-TPCD4-TPCD5 


IJWTC-IJWTC1-IJWGEN-1JWTC3-IJWTC4-IJWLAB !|JJCPOl IJJCPDO 


Tape to Data Cell 


TPDC-TPDC2-TPDC3-TPDC4-TPDC5 


IJWTM-IJWTM1-IJWGEN-IJWTD3-IJWTD4-IJWLAB ' [ IJJCPDO 


Tape to Disk 


TPDK-TPDK2-TPDK3-TPDK4-TPDK5 


IJWTD-IJWTD1-IJWGEN-IJWTD3-IJWTD4-IJWLAB j J IJJCPDO 


Tape to Printer 


TPPR-TPPR2-TPPR3-TPPR4-TPPR5 


IJWTP-IJWTP1-IJWGEN-IJWTP3-IJWTP4-IJWLAB UJJCPO j IJJCPDO 


Tape to Tape 


TPTP-TPTP2-TPTP3-TPTP4-TPTP5 


IJWTT-IJWTTl-IJWGEN-IJWn3-IJWTT4-IJWLAB JUJCPOJ IJJCPDO 



Figure 3. Phase and Module Nara.es for the File-to-File Programs 
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bENTRY 

defines the text of the last input 
object module. 



//bEND 

defines the end of utility control 
cards. 



/g 



//bLBLTYP 



TAPE defines the reserved 

label area (used only if 
tape label checking) . 



NSDCnn) used only if 

nonss'~fuentia 1 files are 
to be copied by the 
copy/restore programs. 

//bEXEC LNKEDT 

executes the linkage editor program. 

//bTLBL 

tape volume-label information (used 
only if label checking) . If running a 
disk program, the job control set DLBL 
and EXTENT must be used. 

//bEXEC 

defines the end-of-job control cards 
and signals the start of program 
execution. 

(Utility control information is entered 
at this point, assuming SYSIPT and SYSRDR 
are assigned to the same device.) 



defines the end of job. 



Note: To catalog this same tape-to- tape 
program from the relocatable to the core 



1 vr^ r^c^ 



1 T V^-i^sv^T -l-K. 



:;ci.iti L^di 



be used with the following changes: 

• //bOPTION LINK changed to 
//bOPTION CATAL 

• Add a /& card after the //bEXEC LNKEDT 
carvj, an>-i ijSj.ste utility assignment 
information. 

On a tape resident system the result of 
this job is a new resident tape that would 
be generated on SYS002. 

After link editing the program, if you 
expect to rewrite the user routine or 
change the partition allocation, then do 
not delete the program modules from the 
relocatable library. You can then link 
edit the program in either the system or 
the private core image library again. 



PROGRAM 


PHASE NAMES 


MODULE NAMES [ TOS 


DOS 


Assign Alternate Trock-Dlsk 


ATAD-ATAD2-ATAD3-ATAD4- 
ATAD5 


IJWAD-IJWAD1-IJWAD2- 1 
IJWAD3-IJWAD4-IJWAD5 { 


IJJCPDIN 


Assign Alternate Track-Data Cell 


ATAM- ATAM2-ATAAA3- ATAM4 - 
ATAM5 


IJWALTM-IJWAM1-IJWAM2- ] 
IJWAM3-IJWAM4-1JWAM5 


IJJCPDIN 


Clear Data Cell 


CLDC-CLDC2-CLDC3 


IJWCLM-IJWCLM1-IJWCLD2- j 
IJWCLD3- 


IJJCPDO 


Clear Disk 


CLRDSK-CLRD2-CLRD3 


IJWCLD-IJWCLD1-IJWCLD2 j 
IJWCLD3- 


IJJCPDO 


Copy Disk to Card 


CRDC-CRDC2 


IJWKC-IJWKC1-IJWKC2- ] 


IJJCPDIN 


Copy Disk to Disk 


CRDD-CRDD2 


IJWRD-IJWRD1-IJWRD2- j 


IJJCPDIN 


Copy Disk or Data Cell to Tape 


CRDT-CRDT2 


IJWKT-IJWKT1-IJWKT2- 1 


IJJCPDIN 


Initialize Disk 


1 NTD- 1 NTD2- 1 NTD3- 1 NTD4 


IJWID-IJWID1-IJWID2- j 
IJWID3-IJWID4- 


IJJCPDIN 


Initialize Tape 


INTT 


IJWIT 




Initialize Data Cell 


INTM-INTM2-INTM3-INTAM 


IJWIM-IJWIM1-IJWIM2- 1 
IJWIM3-IJWIM4 j 


IJJCPDIN 


Restore Card to Disk 


CRCD 


IJWRC-IJWRCl- 1 


IJJCPDIN 


Restore Tape to Disk or Data Cell 


CRTD 


IJWRT-IJWRTl- ] 


IJJCPDIN 


Tape Compare 


TPCP-TPCP2-TPCP3 


IJWTPCP-IJWTCP-IJWTCP2- | IJJCPO 
IJWTCP3-IJWXIT- 1 


IJJCPDO 


VTOC Display Batched 


LISTVTOC 


IJWLVB-IJWLVl-IJWLVT- 


IJJCPDON 


MPS 


LISTVTOC 


IJWLVM-IJWLVl-IJWLVT- \ 


IJJCPDON 



Figure U. phase and ?^odule Names for the Special Purpose Frograins 
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In order to link edit the utility 
programs to operate in a batched- job 
foreground partition in systems which do 
not support a private core iirage library, 
the following procedure is required for all 
programs except VTOC display. Place a 
bACTIONbFn card (where n is 1 or 2) 
immediately after the //bOPTION CATAL card. 
(For the link- edit procedure for the VTOC 
display program, see "VTOC Display.") 

In DOS systems which support the private 
core image library option, the programs may 
be cataloged in a private core image 
library. A program may be link edited to 
execute in one or more partitions. For 
example: 

1. Using the job stream described above, 
execute the linkage editor job in the 
bac kground partition and catalog the 
program to the system core image 
library. 

2. Using the same job streair (i.e., nc 
ACTION card used) , execute the linkage 
editor job in the desired foreground 
partition and catalog the program to a 
private core image library assigned to 
that partition. Thereafter, when it is 
desired to execute the program in the 
foreground partition, assign the 
private core image library and the 
program will be loaded from there. 

If it is desired to link edit and 
execute the program without cataloging to a 
core image library, use // OPTION LINK. 
However, a private core image library irust 
be assigned when executing the linkage 
editor in a foreground partition. Unless 
stated otherwise, all further discussions 
of the core image library in this 
publication refer to the system core image 
library. 



A typical example of the control cards 
used when executing a tape-to-tape program 
from the core image library for a distinct 
job is : 

//bJOB 

user-defined job name. 

//bTLBL 

tape volume and file label information 
(only if label checking). 

//bASSGN 

input and output device assignments. 

//bUPSI 

user-defined label processing. 

//bEXEC TPTP 

program execution card. 

(Utility control statements are entered 
as needed, assuming SYSIPT and SYSRDR are 
assigned to the same device. ) 

//bEND 

defines the end of utility control 
cards. 



/g 



defines the end of job. 



Checkpoint Records 

checkpoint records will be handled as any 
ether record by the assign alternate 
track-disk and initialize disk programs. 
All ether utility programs ignore and 
bypass any checkpoint records encountered. 
The copy and restore disk or data cell 
programs provide both checkpoint and 
restart facilities. 
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Explanations of the Utility Specifications 



File-to-File Utilities 

Seventeen utility programs are provided for 
the transfer of data files froir anji of the 
normal input devices to any of the normal 
output devices. A file can be transferred 
between unlike storage mediums (tape to 
disk), like mediums (tape to tape), or, in 
the case of disk to disk or data cell to 
data cell, the files may be transferred 
from one area to another area of the same 
iinit. Throughout the general discussion of 
the file-to-file programs, any reference to 
DASD information can be equally applied to 
disk or data cell. 

A file can be transferred from an input 
medium to an output medium with these 
options : 

C OPY indicates that the file is to be 
transferred from an input medium tc an 
output medium without change to the format 
of the records or the file. 

REELOCK transfers the input file from an 
input medium to an output medium with only 
the block size being changed. 

FIELD SELECT rearranges or drops fields 
within each input record, cr converts them 
to zoned or packed decimal. 

REBIOCK AND FIELD SELECT is a combination 
of the reblock and field-select options. 

Printer output allows you tc shew the 
output in three ways : 

DISPLAY allows you to display a 
byte-for-byte representation of the 
information. 

LIST gives an edited representation of the 
information. 

LIST AND FIELD SELECT is a combination of 
the list and field select options. 

For the card to printer and/or punch 
programs, two other output options are: 

BOTH_PRINT_AND_pyNCH is a combination cf 
copy and list. 

BOTH_PRINT_AND_PyNCH_WITH_FIELD_SEIECT 
combines copy and list with field select. 



These programs will handle fixed-length, 
variable-length, and undefined-length 
records; however, only fixed- or variable- 
length records can be retlocked or field 
selected. 



If fields are sel 
variable-length reco 
record must be descr 
portion (initial sec 
is common to all rec 
Only on the fixed po 
be employed; a field 
into the first four 
field) of the output 



Label Checking 



ected from 

rds, a portion of the 
ibed as the fixed 
tion of a record that 
ords) of the record, 
rtion can field select 

cannot be selected 
bytes (record length 

record. 



♦This chapter applies only to the 
file-to-file utility programs, unless 
specifically stated otherwise. 



The IBM System/360 Disk and Tape Operating 
Systems utility programs process tape and 
EASD labels like the Disk and Tape 
Operating Systems IOCS. For information on 
label checking see the Supervisor and I/O 
Macros publications as listed in the 
preface of this publication. 



NONSTANDARD AND USER LABEL HANDLING 

Tape files containing IBM standard labels 
or no labels at all can be processed 
without providing a user routine. When 
using a file-to-file utility program to 
process nonstandard or user labels or when 
no label checking is desired, an UPSI job 
control card is required. The first five 
bits (bits 0-4) of the UPSI byte have been 
assigned as shown below. The low-order 
bits (bits 5-7) have no significant values 
for the file-to-file utilities. (If an 
UPSI byte is significant to a 
special-purpose utility, it is explained 
within the individual program^ description.) 

Left to right, bits 0-4 of the UPSI byte 
must be set as follows (0 equals off, 1 
equals on) : 

Bits and 1 are switches for input label 
checking. 

Bit Off = standard input-label checking. 
On = nonstandard or no input-label 
checking. 

Bit 1 Off = no user input-label checking. 
On = user input-label checking. 

Bits 2 and 3 are switches for output label 
checking . 
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Bit 2 Off = standard output-label 
checking. 
On = nonstandard or no output- label 
checking. 



Bit 3 Off = no user output-label checking. 
On = user output-label checking. 

Bit 4 is a switch for nonstandard or no 
output-label handling. 

Bit 4 Off = write leading taperrark. 

On = do not write leading tapertiark. 

Bit 7 is used for f orced-end-of-volume 
(FEOV) . 



Bit 7 Off = 



On = 



the file to be copied was 
built by using the direct 
access method (DAK) or indexed 
sequential access method 
(ISAM) . 

the sequential file to be 
copied from disk or data cell 
to printer, punch, disk or 
tape supports FEOV. 



When an UPSI card is supplied tc a 
program, the byte is propagated from job 
step to job step unless another UPSI card 
is supplied to reset the bits. All of the 
UPSI bits are set to following each job 
performed unless a new statement is 
supplied. When rightmost bits are not set 
by an UPSI statement, they are assumed to 
be zero. 



Examples ; 

An UPSI card is required for no 
input-label and standard output-label 
checking: 

//bUPSI 10000000 

An UPSI card is required for nc 
input-label or output-label checking with a 
leading tapemark on the output: 

//bUPSI 10110000 

An UPSI card is not required when there 
is standard input-label, output-label, and 
no user label checking. 

A user label routine must be supplied 
only if bits 1 or 3 of the UPSI byte are 
on. You must supply your label checking 
routine in assembled, relocatable format. 
This control section must define three 
symbolic names as entry (Ei^TRY) points: 

IJWLABIN The symbolic entry pcint to the 

input-label processing section of 
the user's routine. 



IJWLABOU The symbolic entry point to the 
cutput-label processing section 
cf the user's routine. 

IJWLAEND The symbolic entry to represent 
the last location +1 of the 
program. 

After the program is loaded, control is 
given to your initialization routine 
through the address found in the END card 
(assembly program END card) . You can then 
perform any initialization desired before 
label checking. Upon corrpleticn of 
initialization, you must branch back to the 
utility program (the return address is 
found in register 14). The initialization 
routine may consist of only the return 
branch instruction. All ether entries made 
tc the user's routine will be made through 
the symbolic names IJWLAEIN cr IJWLABOU. 
Tc return from IJWLAEIN and IJWLABOU 
user-label processing to IOCS label 
processing, use the LERET macro 
instruction. (See the Su£erviscr_and_I/0 
M^^os publications listed in the preface 
of this publication.) The user's routine 
vvill be entered from the IOCS 
label-processing routines. 

The user's routine can be assembled with 
a lOK assembler. This routine has access 
tc all IOCS macros except these which use 
the transient area (CANCEL, EOJ, OPEN, 
CLOSE) . 

Fcr further information ccncerning 
communication with the IOCS cpen and close 
routine, see the Su2erviscr_and_I/0_Macrcs 
publications listed in the preface of this 
publication. 



Utility Message Routines 

The message routine of the utility programs 
is available for your use. The entry point 
to the message routine is located at the 
symbolic address, IJWxxxKS (xxx can be 
determined from Figure 5). Your user 
routine may not have access to register 4 
and must supply registers 0, 1, and 7 with 
the following information: 

Reg The length of the message. 

Reg 1 The address of the first byte of the 
message . 

Reg 7 The return address to the user's 
routine. 

No diagnostics will be performed on the 
contents cf these registers. 

If the first character of a message is 
nonblank, the message is printed on SYSLST 
and SYSLOG and a reply is requested from 
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SYSLOG. The reply, or answer byte given, 
must be one character located at the 
symbolic address IJWxxxAN on return from 
the message routine (xxx can be deterrrined 
from Figure 5) . If the first character of 
a message is blank, the message is printed 
only on SYSLST. In either case, the first 
character of the message is not printed. 

If a message is printed that requires a 

■r-Qr^lw =,r^A GVCTnC i c: =i r^ v i n -1- Q r- Y ' TJ t • 1.7 i 1 1 

be in the answer byte (IJWxxxAN) en return 
from the message routine. 

If SYSLST and SYSLOG are the same 
printer and the miessage was designated to 
both, the message will only appear once. 



filename, volume-sequence, and 
file-sequence numbers must be placed in the 
ILBL card. The positionina performed must 
te by the use of the magnetic tape command 
(MTC) . 



Reference information on the I^TC command 
can be found in the Syste m Ccntrcl_and 
Service publications as listed on the frcnt 

When using the utility programs to 
process multifile tape input volumes, the 
nc-rewind-cption (IN) parameter found in 
the utility modifier statement must be 
specified . 



r T 

I xxx I Meaning 



1 CDl 


Card 


1 CTl 


Card 


1 DCl 


Disk 


1 DDl 


Disk 


1 DM1 


Disk 


1 DPI 


Disk 


1 DTI 


Disk 


1 MDl 


Data 


1 MMl 


Data 


1 MPl 


Data 


1 MTl 


Data 


1 TCI 


Tape 


1 TDl 


Tape 


1 TMl 


Tape 


1 TPl 


Tape 


1 TTl 


Tape 


1 TCP 


Tape 



to Disk Program 

to Tape Program 

to Card Program 

to Disk Program 

to Data Cell Program 

to Printer Program 

to Tape Program 

Cell to Disk Program 

Cell to Data Cell Program 

Cell to Printer Program 

Cell to Tape Program 

to Card Program 

to Disk Program 

to Data Cell Program 

to Printer Program 

to Tape Program 

Compare Program 



Multifile Volume (Tape) 



Figure 5. Answer Byte or Entry Point 
Completions 



The utility progra:ns may be used to build 
multifile volumes and read from them at 
later dates. File positioning will be 
performed by logical IOCS only if the files 
are labeled with IBM standard labels. 
Output files, nonstandard labeled files and 
unlabeled files are not acceptable. The 



Multivolume Files (Tape) 



Input or c 
consist of 
volumes mu 
The centre 
process th 
process ea 
same field 
Each tape 
is uncendi 
no alterna 
In all oth 
treated as 
parameter 
statement. 



utput files to thes 

multiple volumes. 
St belong to the sa 
1 statement entries 
6 first volume are 
ch successive volum 
s are checked in ea 
reel of a multivolu 
tionally rewound an 
te tape drive has b 
er cases the volume 
specified by the i 
in the utility modi 



e programs can 
The multiple 

me data files, 
used to 

used to 

e because the 

ch volume. 

me tape file 

d unloaded if 

een assigned, 
will be 

nput or output 

f ier 



when alternate tape drives are specified 
and processing is completed en a particular 
file, the last drive processed will become 
the primary drive. If a new job is 
executed at this time, the last drive 
processed will then become the primary 
drive unless a reassignment cf tape drives 
is made. 



Record Skipping 



Any number of logical records (up to 
99,999,999) may be bypassed before 
processing is performed. This number can 
be indicated in the Rx parameter of the 
utility modifier statement. The num.ber 
indicated in the parameter will be the 
first record to be processed. 

Record skipping cannot be performed for 
the copy function (TO , and if specified, 
it will be ignored. To skip records at the 
beginning of a file and copy the remainder,- 
the reblock function (TR) must be 
indicated, and the input-description and 
output-description parameters must contain 
identical values. 
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Sequence Numbering field is numbered starting from 1 (witn 

high-order zeros) and is increased by 1 for 
Sequence generation on card output can be each succeeding card. If a sufficiently- 
indicated in the utility naodifier long field is not defined to number all of 
statement. A field up to ten characters the cards, the number ^raps around to zero 
long can be punched into each card. This 
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without an error indication. The sequence 
number overlays any data selected into the 
sequence area of the card. Sequence 
checking also can be performed for card 
input to assure ascending sequence of the 
specified field. If a card is out of 
sequence, a message is written on SYSLST 
and processing continues. 



Binary Records 

When processing cards punched in column 
binary format, the input and output 
parameters (parameters A and B in the 
utility modifier statement) must be 
specified as twice the number of card 
columns used. Since the column binary 
special feature on the card read-punch 
separates the data in each card column 
punched in binary into one odd and one even 
byte, a buffer size of 160 bytes is 
required for an 80-byte binary record. 



Printer Output 

Printer output can be in 120- , 132-, or 
144-character line length depending on the 
printer being used and the output format. 
Printer output can be in either data 
display or list format. Examples of these 

formats appear in Appendix B. P ri nter 

Output . 



DATA LIST 

The data list format provides a simple 
edited listing of the file. The entire 
print line is available for data output; 
output is restricted to one line per 
logical record. The input record length 
cannot exceed the size of the print line. 
If so,, field select is required. Either 
120-, 132-, or 144-character line length 
can be specified in the utility modifier 
statement. Fields can be selected to 
unpack, convert to hexadecimal 
representation, and format the page. Data 
list mode allows only character printing 
unless a hexadecimal field is selected 
through a field select entry. 

Page numbers normally print at the 
bottom of each page but may be suppressed.. 
A heading line can be optionally printed. 



Available I/O Area 

Each of these utility programs can run in < 
lOK partition. The maximum amount of 
storage available as I/O area is the area 
beginning at the end of the program being 
run and extending to the end of the 
available storage. The available storage 
area is reduced by: 

• field- se lectio n, which is generated in 
upper storage. The instructions 
necessary to move and process each 
field defined reduce the available I/O 
area. 



DATA DISPLAY 

The data display format provides a visual 
picture of the data file. Fixed, variable 
and undefined records can be handled, but 
the field select option cannot be used. 
Every byte of data in the file appears in 
the printed output. If data display is 
specified (TD) , 120-character line is 
forced. Only portions of the print line 
are used for data. The first twenty 
positions (columns 1-20) are reserved for 
information describing the file, such as 
block size, block number, and record 
number. Data is normally displayed in 
hexadecimal form but may optionally be 
displayed in alphameric form. A heading 
line can be printed. A scale line is 
printed at the top and bottom of each page. 
If record length is specified as 
fixed-length or variable-length, each 
logical record starts on a new line. The 
input block size is printed only if the 
input length is not equal to the specified 
block size. The excess is not printed when 
the specified maximum length block size is 
exceeded. Single spacing is used between 
lines of print. 



• R efclocki ng, which is generated in upper 
storage. The I/O area is reduced by 
the number of instructions necessary to 
move one record. 

• S up ervisor, which can immediately 
preceed the origin location of the 
utility program. A large supervisor, 
therefore, reduces the I/O area. 



MINIMUM I/O AREA 

Before reduction of the I/O area, caused by 
the type of user processing to be 
performed, the programs ensure you of these 
minimum I/O areas (main storage sizes are 
based on a supervisor of 6,144 bytes): 



File-to-File Utilities 



Card to Disk 



Card to Printer 
and/or Punch 



Not less than 6,000 
bytes . 



Not less than 4,50 
bytes . 
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Card to Tape 



Data Cell to 
Data Cell 



Data Cell to 
Disk 



Data Cell to 
Printer 



Data Cell to 
Tape 



Disk to Card 



Disk to Data 
Cell 



Disk to Disk 



Not less than 6,4 00 
bytes. 



Not less than 5,500 
bytes. 



Not less than 5,5 00 
bytes. 



Not less than 5,000 
bytes. 



Not less than 5,800 
bytes. 



Not less than 5,200 
bytes. 



Not less than 5,500 
bytes. 

Not less than 5,500 
bytes. 



Disk to Printer Not less than 5,000 
bytes. 



Disk to Tape 
Tape to Card 



Tape to Data 
Cell 



Tape to Disk 



Not less than 5,800 
bytes. 

Not less than 6,000 
bytes. 



Not less than 5,400 
bytes. 

Not less than 5,400 
bytes. 



Tape to Printer Not less than 5,100 

bytes. 



Tape to Tape 



Not less than 5,900 
bytes. 



Special-Purpose Utilities 

Assign Alternate 

Track-Data Cell Enough to assign one 

track at one tiire. 

Assign Alternate 

Track-Disk Enough to assign one 

track at one tiire. 

Clear Data Cell Enough to clear three 

tracks at one time. 



Copy-Disk to 

Disk Not less than 6,400 

bytes. 

Copy and Restore - 

Disk to Card Not less than 6,400 
bytes. 



Copy and Restore- 
Disk or Data Cell 
to Tape 



Initialize Data 
Cell 



iMut xeas man d,buu 
bytes . 



Enough to initialize one 
track at one time. 



Initialize Disk Enough to initialize one 
track at one time. 



Tape Compare 



VTOC Display 



Not less than 6,000 
bytes . 



140 bytes; more I/O area 
will not te used. 



Clear Disk 



Enough to clear one 
track at one tirre. 



I/O Area Assignment 

If the utility program can assign two input 
cr output areas, overlap of the I/O 
operations can be performed whenever 
channel assignment permits. The utility 
program determines the method of I/O area 
assignment based on the maximum block size, 
the available I/O area, and the type of job 
being processed. 

For the copy and both print and punch 
functions, the I/O area assignments may be: 

2 input/output areas 

1 input/output area 

For the field select, reblock, reblock 
and field select, list, list and field 
select, data display, and both print and 
punch with the field select function, the 
I/O area assignments may be: 

2 input and 2 output areas 

1 input and 2 output areas 

2 input and 1 output areas 
1 input and 1 output area 

First— Character Forms Control 

when the first-character forms control is 
used, the first character of the data 
record is considered to be the 
forms-control character and is printed 
unless excluded by field selection. For 
fixed-length records the forms-control 
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character is the first character of the 
logical record. For variable-length 
records the forms-control character is the 
first character following the record-length 
field. First- character forms control is 
invalid for records with key fields or data 
display. This option allows a choice of 
four standards by which forirs control can 
be regulated: 



The type of forms-control character to 
be recognized can be indicated in the S 
parameter of the tape-, disk-, and data 
cell-to-printer programs. 



TYPE A 

Type h indication allows you to use the 
character that is the command-code portion 
of the System/36 channel corrmand word used 
in printing a line or spacing the 
forms. If the character is not one of the 
following characters, single spacing after 
printing is performed and no error 
indication is given. Printing occurs only 
for command codes which include a print in 
the operation. 

8-Bit Punch 
Q2^^ Combination Functi on 
00000001 12,9,1 Write (no automatic 

space) 



00001001 12,9,8,1 
00010001 11,9,1 
00011001 11,9, 8,1 
10001001 12,0, 9 

10010001 12,11,1 

10011001 12,11,9 

10100001 11,0,1 

10101001 11,0, 9 



Write and space 1 line 
after printing 

Write and space 2 
lines after printing 

Write and space 3 
lines after printing 

Write and skip to 
channel 1 after 
printing 

Write and skip to 
channel 2 after 
printing 

Write and skip to 
channel 3 after 
printing 

Write and skip to 
channel 4 after 
printing 

Write and skip to 
channel 5 after 
printing 



10110001 12,11,0,1 Write and skip to 

channel 6 after 
printing 



10111001 12,11,0,9 Write and skip to 

channel 7 after 
printing 



11000001 12,1 

11001001 12,9 

11010001 11,1 

11011001 11,9 

11100001 11,0,9,1 

00001011 12,9,8,3 
00010011 11,9,3 



Write and skip to 
channel 8 after 
printing 



Write and skip to 
channel 9 after 
printing 

Write and skip to 
channel 10 after 
printing 

Write and skip to 
channel 11 after 
printing 

Write and skip to 
channel 12 after 
printing 

Space 1 line 
immediately 

Space 2 lines 
immediately 



00011011 11,9,8,3 Space 3 lines 

immediately 



10001011 12,0,8,3 Skip to channel 1 

immediately 



10010011 12,11,3 



Skip to channel 2 
immediately 



10011011 12,11,8,3 Skip to channel 3 

immediately 



10100011 11,0,3 



Skip to channel 4 
immediately 



10101011 11,0,8,3 Skip to channel 5 

immediately 



10110011 12,11,0,3 Skip to channel 6 

immediately 



10111011 12,11,0,8,3 Skip to channel 7 

immediately 
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11000011 12,3 Skip to channel 8 

iimnediately 

11001011 12,0,9,8,3 Skip to channel 9 

irriDediately 

11010011 11,3 Skip to channel 10 

immediately 

11011011 12,11,9,8,3 Skip to channel 11 

iirmediately 

11100011 0,3 Skip to channel 12 

immediately 

00000011 12,9,3 No op 



TYPE B 

Type B allows you to use the 
d-modifier character of the IBM 1401 
carriage-control instruction used in 
printing a line or spacing fcrirs viith a 
1401 system. Printing occurs only for the 
d-modifiers which include a print in the 
operation. If the character read is not 
one of the valid characters, the line will 
be printed after single spacing and no 
error indication will be given. The cedes 
are: 





Immediate 




Skip After 


d 
1 


Skip To 
Channel 


T 


d 
A 


Print To 

Channel 1 


2 


Channel 


2 


B 


Channel 


2 


3 


Channel 


3 


C 


Channel 


3 


4 


Channel 


4 


D 


Channel 


4 


5 


Channel 


5 


E 


Channel 


5 


6 


Channel 


6 


F 


Channel 


6 


7 


Channel 


7 


G 


Channel 


7 


8 


Channel 


8 


H 


Channel 


8 


9 


Channel 


9 


I 


Channel 


9 





Channel 


10 


p 


Channel 
(EBCDIC 


10 

or BCDIC) 


# 


Channel 


11 


• 


Channel 


11 


a 


Channel 


12 


M 


Channel 
(EBCDIC 


12 

or BCDIC) 




Immediate 




After Print 


d 
J 


Space 

1 space 


— 


d 
/ 


Space 

1 space 





K 


2 spaces 


S 


2 spaces 


L 


3 spaces 


T 


3 spaces 



TYPE C 

Type C allows the use of the following 
codes as forms-control characters. If the 
character read is not one of the valid 
characters, the line will be printed with 
single spacing after printing and no error 
indication will be given. 



Code 

+ (EBCDIC or 

ECDIC) 

Blank 





1-9 or J-R 



Space or Skip Action 
Suppress space and print. 

Print and single space. 

Double space, print, and 
space. 

Triple space, print, and 
space. 

Immediate skip to channel 
1-9 (i.e., 1 or J=skip to 
channel 1; 2 or K=skip to 
channel 2, etc), print and 
then space. 



TYPE D 

Type D allows the use of the ASA FORTRAN 
forms-control characters. If the character 
read is not one of the valid characters, 
the line will be printed with single 
spacing before printing and no error 
indication will be given. 

Code Space or Skip Action 

Blank Space one line before 

printing. 

Space two lines before 
printing. 

Space three lines before 
printing. 

+ (EBCDIC or Suppress space before 
ECDIC) printing. 

1 Skip to channel 1 before 
printing. 

2 Skip to channel 2 before 
printing. 

3 Skip to channel 3 before 
printing. 

4 Skip to channel 4 before 
printing. 

5 Skip to channel 5 before 
printing. 

6 Skip to channel 6 before 
printing. 



20 DOS and TOS Utility Programs 



Skip to channel 7 before 
printing. 

Skip to channel 8 before 
printing. 

Skip to channel 9 before 
printing. 

Skip to channel 10 before 
printing. 

Skip to channel 11 before 
printing. 

Skip to channel 12 before 
printing. 



SYSLST/SYS005 CARRIAGE CONTROL 

When separate printers are assigned to 
SYSLST and SYS 005 or the same device is 
assigned to both, the controlling factor in 
carriage control skipping must be 
determined. The possible printer 
assignment and the determining carriage 
control factors are: 



Utility Modifier Statement 

This statement is used with the 
file-to- file programs and allows you to 
describe the input file that is to be 
processed and the output file that is 
desired. If the statement is present and 
optional parameters are left out, default 
values are assumed. 



When a file is to be copied without 
change, it is possible to use the program 
without the presence of a utility modifier. 
All record statement formats (fixed-length, 
variable-length, undefined) may be copied 
without change as long as maximum block 
sizes do not exceed the default values of 
the particular program. If default values 
are exceeded, the output block is 
truncated. 



The values the program assumes are 
unique to each program and are given in the 
discussion of each program. 



Printer Assign men t Co ntrol Factors 

SYSLST as a separate LINECT (line count) 
printer. operand in the set 

command. 

SYS005 as a separate Sensing either channel 
printer. 12 or the proper 

forms- control 

character. 

SYSLST and SYS005 as Forms-control charac- 
the same printer. ter or, if none is 

present, the IINECT 
operand in the set 
command. Channel 12 
will not be detected. 



First— Character Stacker— Select Control 

First-character stacker-select control can 
be specified for the tape and disk to card 
programs. The stacker-select control 
character must be the first character of 
the data portion of the record and is 
punched unless excluded by field select. 
These characters cause the indicated 
action. Any other character will cause the 
selection of pocket 1. 



Character 


Action 




V 


Select 


pocket 1 


w 


Select 


pocket 2 



The general format of the utility 
modifier statement is: 



//bUxxbTt,Ff,A=( input) ,B= (output) ,E= (c,d) , 
Ix,Ox,Px,Q=(x,y) ,Rx,Sx 



Figure 6 shows detailed information of 
the entries in the utility modifier 
statement. 

//bUxxb 



//bU 



xxb 



identifies this as a utility modifier 
statement. (The letter b always 
indicates a blank space.) 



these are the initials of the program 
and can be omitted if this statement 
is to be used with more than one 
program. 



Following these identifiers the desired 
parameters are indicated. Each parameter 
must be followed by a comma, except the 
last parameter which must be followed by at 
least one blank. The optional parameters 
[E=(c,d) ,Ix,Ox,Px,Q= (x,y) ,Rx,Sx] can be 
emitted from the utility modifier statement 
and assumed values made. Commas should not 
be entered to indicate omitted parameters. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


FuncHon 
Tt 


TC 

TF 

TR 

TRF 

TD 

TL 

TLF 

TB 

TBF 


T 

C 

F 

R 

RF 

D 

L 

LF 

B 

BF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Rebiock and Field Select 

Display 

List 

List and Field Select 

Both Print and Punch 

Both Print and Punch with Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 
The second F must be indicated for fixed-length records. 
The letter V must be indicated for variable-length records. 
The letter U must be indicated for undefined records. 


Input 
Description 


A=(n,m) 
A={K=I,D-I) 

A=(g) 


A= 
(n,m) 

A= 
(K=I,D=I) 

A= 

(g) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable-length input records, the fixed portion of each input record (the letter n) and the maximum 
block length (the letter m) must be enclosed in parentheses and separated by a comma. 

This letter and symbol indicate this is the input-description parameter. 

For fixed-length DASD input records with keys, the letter K and symbol = must precede the length 
of the key field. The letter D and symbol = must precede the length of the data field. These two 
entries must be separated by a comma cmd enclosed in parentheses. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable-length input records without field select, the maximum 
block length must be enclosed in parentheses. 


Output 
Description 


B={n,m) 

NK=I,D=!) 
B=(g) 


B= 
(n,m). 

B= 
(K=I,D=I) 

B= 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block 
length (the letter m) must be enclosed in parentheses and separated by a comma. For field select 
with variable-length output records, the fixed portion of each output record (the letter n) and 
the maximum output block length (the letter m) must be enclosed in parentheses and separated 
by a comma. 

This letter and symbol indicate this is the output-description parameter. 

For fixed-length DASD output records with keys, the letter K and symbol = must precede the length 
of the key field. The letter D and symbol = must precede the length of the data field. These two 
entries must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the output-description parameter. 



Figure 6. Utility Modifier Statement Parameters (Part 1 of 2) 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 




B=(p) 
B=(n,p) 


(g) 

B= 

(P) 
B= 
(n,p) 


For undefined output records or variable-length output records wifliout field select, ttie maximum 
block length must be enclosed in parentheses. 

This letter and symbol indicate this is the output-description parameter. 

For printer output the size of the print line (120, 132, 144) must be entered. 

This letter and symbol indicate this is the output description parameter. 

For field select of variable-length records with printer output records, the fixed portion of each 
output record (the letter n) and the size of the print line(the letter p) must be enclosed in 
parentheses and separated by a comma. 


Optional 


Ix 

Ox 

Sx 

Px 

Rx 

Q=(x, y) 
E=(x,y) 




These parameters are unique to each program and are explained under the discussions of the 
individual programs. 



Figure 6. Utility Modifier Statement Parameters (Part 2 of 2) 



The first parameter, indicated by Tt in 
the general format, describes the type of 
function to be performed. This parameter 
is required in all utility modifier 
statements. The letter T is entered to 
identify this parameter and is followed by 
one or two additional letters to indicate 
the type of function to be performed: 



TC Copy 

TF Field select 

TR Reblock 

TRF Reblock and field select. 

The parameters for printer output 
programs are: 

TD Data display (a byte-f or-byte 
representation of the file) 



is followed by an additional letter to 
indicate the exact record format: 



FF Fixed-length records 
FV Variable-length records 
FU Undefined-length records. 

The third parameter indicated by 
A= (input) in the general format, is the 
input-file description. This parameter is 
required in all utility modifier statements 
and is entered in one of three forms : 



Format 

A=(n,m) 

A=(K=1,D=1) 

A=(g) 



Maximum Number 
of_Di3its 

4,5 
5 



TL List (an edited representation of the 
file) 

TLF List and field select. 



The parameters for printed and punched 
output with the card-to-printer and/or 
punch program are: 

TB Both print and punch 

TEF Both print and punch with field select. 

The second parameter, indicated by Ff in 
the general format, describes the format of 
the records to be processed for input and 
output. This parameter is required in all 
utility modifier statements. The letter F 
is entered to identify this parameter and 



i^=(n,m) 

is indicated for fixed-length records 
without key fields and variable-length 
input records with field select 
without key fields. The letter A and 
symbol = identify this as the 
input-file description. The (n,m) 
indicates that the input record length 
or the fixed portion of 
variable-length records (the letter n) 
and input block length or maximum 
block length (the letter m) for 
variable-length records should be 
entered, separated by a comma, and 
enclosed in parentheses. If a fixed 
input is 50 characters long and the 
block length is 250 characters long, 
the input parameter must be entered 
A=(50,250) and must be followed by a 
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coinrna to separate this pararreter 
the one following. 



A=(K=1,D=1) 

is indicated for fixed-length DASC 
records when key fields are present. 
The letter A and syitibcl = identify 
this as the input-file description. 
The (K=1,D=1) indicates that the 
letter K and symbol = are followed by 
the length of the key and that the 
letter D and symbol = are followed by 
the length of the data field. These 
must be separated by a comma and 
enclosed vvithin parentheses. If a 
DASD input record has a key length of 
10 and data field length of SC'^the 
input parameter must be entered 
A=(K=10,D=60) and must be followed by 
a comma to separate this parameter 
from the one following. 



A=(g) 

is indicated for undefined input 
records and variable-length input 
records without field select. The 
letter A and the symbol = identify 
this as the input-file description. 
The (g) indicates that the iraximuir 
input block length is to be entered in 
parentheses. If a file of undefined 
records contains a maximum block 
length of 300, the input parameter 
must be entered A=(300) and must be 
followed by a comma tc separate this 
parameter from the one following. 

The fourth parameter, indicated by 
B=(output) in t^e general format, is the 
output-file description, and is entered in 
one of five forms: 



Format 



Kaximum Number 
of_Digits 







B=(n,m) 


4,5 


B=(K=1,D=1) 


4,5 


B=(g) 


5 


B=(p) 


3 


B=(n,p) 


4,3 



E= {n,ra) 

is indicated for fixed-length records 
without key fields and variable-length 
records with field select without key 
fields. The letter B and the symbol = 
identify this as the output-file 
description. The (n,m) indicates that 
the output record length or the fixed 
portion of variable-length records 
(the letter n) and the output block 
length or maximum block length (the 
letter m) for variable-length records 
should be entered, separated by a 
comma and enclosed in parentheses. If 
a fixed-length output record length is 



5 characters long and the block 
length is 250 characters long, the 
output parameter must be entered 
B=( 50,250) and must be followed by a 
comma if another parameter is to 
follow. 



B=(K=1,D=1) 

is indicated for fixed-length DASD 
records when key fields are present. 
The letter B and symbol = identify 
this as the output-file description. 
The (K=1,D=1) indicates that the 
letter K and symbol = are followed by 
the length of the key, and the letter 
D and svmhol = are followed b^^' the 
length of the data field. These must 
be separated by a comma and enclosed 
within parentheses. If a DASB output 
record has a key length of 10 and a 
data field length of 60, the output 
parameter must be entered 
B={K=10,D=6 0) and must te followed by 
a comma if another parameter is to 
follow. 



E=(g) 



is indicated for undefined output 
records and variable-length output 
records without field select. The 
letter B and the symbol = identify 
this as the output-file description. 
The (g) indicates that the maximumi 
output block length is to be entered 
within parentheses. If an output file 
of undefined records is to contain a 
maximum block length of 300, the 
output parameter must be entered 
B=(300) and must be followed by a 
comma if another parameter is to 
follow. 



E=(p) 



is indicated for printer output 
programs. The letter B and the symbol 
= identify this as the output-file 
description. The (p) indicates the 
size of the print line (120, 132, or 
144) . 



E=(n,F) 

is indicated for pr 
programs with field 
variable-length rec 
indicates the last 
may be used for fie 
copy variable is to 
variable portion of 
follow the nth prin 
last print position 
the size of the pri 
p) must be enclosed 
separated by a comm 



inter output 

select of 
ords . The letter n 
print position that 
Id selection. if 

be performed, the 

the record will 
t position. The 

(the letter n) and 
nt line (the letter 

in parentheses and 
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PARAMETER COMBINATIONS 

The record format, input-file description, 
and output-file description parameters can 
be presented in these possible forirs: 

FF, A= ( n, m) , B= ( n, m) 
FF,A=(K=1,D=1) ,B=(n,m) 
FF,A=(n,m) ,B=(K=1,D=1) 
FF, A=(K=1,D=1) ,B={K=1,D=1) 
FV,A=(n,m) ,B=(n,m) 
Fy,A=(g) ,B=(g) 
FU,A=(g) ,B=(g) 

Note: The optional parameters 

[E= (c,d) , Ix,0x,Px,2= (x,y) ,Rx, and Sx] are 

unique to each program and are explained 

under the discussions of the individual 

programs. 

For printer output there are five 
additional forms: 



FF,A=(n,ra) ,B=(p) 
FF,,A=(K=1,D=1) ,B=(p) 
FV,A={g) ,B=(p) 

n,p) 



FV,A={g) ,B=(p) 
Fa,A={g) ,B=(p) 
FV,A=(n,m) ,B=(i 



FIELD SELECT STATEMENT 

With this option a field in each input 
record or the fixed portion of 
variable-length records can be moved to a 
different relative location in the 
corresponding output record. Those areas 
of the output record that are net filled 
vjith selected fields are filled with blanks 
(X'40'). A selected field can be iroved in 
the folloiving ways: 

• Moved without change. 

• iyioved and converted from zoned to 
packed decimal. 

• Moved and converted froir packed to 
zoned decimal. 

• Moved and converted to hexadecimal for 
printer output. 

Converting a field causes the output 
field to be smaller or larger than the 
input field. A field converted to 
hexadecimal representation for printer 
output requires twice the airount cf area as 
that required for input. 

When field select is used, only those 
bytes in the input record that are selected 
will be transferred to the output record. 
It is therefore possible with field select 
to ignore certain fields and have them 
dropped from the output record. The 
section of a variable-length record that is 
not defined as the fixed portion can be 



copied onto the output record. As a result 
of dropping fields or changing field 
fornats, it is possible to have output 
records of a different length from the 
input records. 



The utility programs generate the 
necessary instructions for this option. 
This technique provides cptiirum performance 
for the user. 



A key field can be selected from or 
placed into the key portion cf a DASD 
record. The field that is selected must be 
completely contained within the key field 
cr data field. A field that is placed in a 
key field or data field must be placed 
entirely in the key portion or the data 
portion of the record. Fields are selected 
cr placed, relative to one of the first 
byte (i.e. byte 1, not byte 0) of either 
the key or data field. 



The field select control s 
provides the information for 
file-to-file programs to tran 
from an input record to the s 
different relative location c 
record. If the field select 
punched in cards, each card n 
filled even if additional fie 
cards follow. Each card shou 
//bFSb. As many field select 
necessary may be used. For e 



tatement 

the 

sfer fields 

ame or a 

f the output 

statements are 

eed not be 

Id select 

Id begin with 

statements as 
xample: 



//bFSbl,15,l/16, (P,5,3) ,16/72, (P,3,2) , 
19/75, CP,6,4) ,21/23, (P,8,5),25/ 

//bFSb21,2,30 

The field selected must be complete on one 
statement. Field select can be performed 
on any portion of fixed-length records. 
Only fields within the fixed portion of 
each variable-length record can be 
selected. 

The fixed-length portion cf a 
variable-length record is the initial 
section of a record that is comircn to all 
records. The first four bytes of this 
fixed portion are always the record-length 
indication. 

For nonprinter programs involving 
variable-length records, the record length 
is generated into the first four bytes of 
each output record. The generation of this 
field prohibits field selection from being 
performed in this area. When perforiring 
field selection with nonprinter, variable- 
cr fixed-length records, the r and t in the 
field selection parameter (r,s,t) are 
relative to the first byte of the record, 
which includes the four-byte record length 
indication. 
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For printer programs (list mode) 
involving variable-length records, the 
record length is not generated into the 
output record unless field selected. When 
printer output field selecting of 
variable-length records is perfcrired, the r 
in the field selection parameter (r,s,t) is 
relative to the first byte of the record 
including the four-byte record length 
indication, and the t is relative to the 
first print position of the print line. 
The remainder of the variable-length record 
can be copied onto the output record if 
indicated in the field select statement. 
The format and contents of this statement 
are: 



/ /Df nor , s, t/r, s,t/r ,s, t 
Contents Explanation 



//bFSb 



r,s,t/ 



//b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 

r indicates the starting 
position, relative to one (see 
note below) , of the field in 
the input record tc be 
selected. For binary records, 
this number is relative tc the 
record as it appears in main 
storage, not en the statement. 

, (comma) separates the entries 
in the para:neter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/(slash) separates selected 
fields. 



Example; //bFSbr,s, (K,t) 

When a field is to be selected from a 
key field (DASD input) and is to be placed 
into a key field (DASD output), the 
starting position of the field in the input 
record and output record irust be preceded 
by the letter K and a coirira, and enclosed 
in parentheses. 

ExamEie: //bFSb(K,r) ,s, (K, t) 

The other operations (pack, unpack, and 
hexadecimal) are defined in the 
field-length portion of the pararreter. 
These operations are independent of whether 
the field source or destination is a key. 



PACK 

When the input field is to be packed before 
it is placed in the output record (invalid 
for printer output), the field select 
parameter will appear in this form: 

r, (P,n,m) , t 

P 

identifies the pack operation. 



is the size of the input field. 



is the size of the output field. 



UNPACK 

When the input field is tc be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U,n,ra) ,t 

U 

identifies the unpack operation. 



Note: Bytes of a record are numbered 
consecutively beginning from byte 1, 
not 0. 

When a field is to be selected from a 
key field (DASD input) , the letter K 
follov/ed by a comma and the starting 
position of the field to be selected must 
be placed in parentheses. 

Example: //bFSb(K, r) , s, t 

When a field is to be placed into a key 
field (DASD output) , the letter K followed 
by a comma and the starting position of the 
field in the output record must be placed 
in parentheses. 



is the size of the input field. 



is the size of the output field. 

A packed field contains the sign in the 
right four bits of the low-order byte. 
When the field is unpacked, the sign is 
contained in the left four bits of the 
low-order byte. The input record length, 
denoted by (n) , is in the field select 
statement //bFSbr, (U,n,m) ,t . If (n) is 
made the same length as the packed decimal 
field, the last printed character will 
indicate the numeric value of the last 
digit and the sign of the field. For 
example, 123C will be printed 12C. To 
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print the value of the last nurreric digit 
and drop the sign, you must increase the 
input record length by one. 

//bfSbl, (U, 3,5)1 

Record is 123C, unpacked F1F2C3, printed 
12C. 

//bFSbl, (U, 4,5)1 

Record is 123CD0, unpacked FlF2F3FcOD, 
printed 123. 



be used to indicate the heading line 
desired, but the second statement need not 
be entered if the first statement contains 
all of the desired inforiraticn. The first 
statement is entered //bHlb (followed oy 
the information to be printed in print 
positions 1-74). The second statement is 
entered //bH2b (followed by the information 
to be printed in the rest of the heading 
line) . Heading statements must follow any 
field select statements used. 

Example : //bHlbLI STbOFbBATAbCELLbFILE 



HEXADECIMAL 

Vvhen a program has printed output, the 
field selected may be printed in 
hexadecimal representation. This operation 
is indicated as follows: 

r, (X,n) ,t 

X 

identifies the hexadecimal operation; 



is the size of the input field. 

Only the field length of the input is 
necessary for this operation because the 
output length will always be assumed tc be 
twice as large. X and n are enclosed in 
parentheses and separated by a comma. 



COPY VARIABLE 

When the section of a variable-length 
record not defined as the fixed portion is 
to be copied, the letters CV (copy 
variable) must be present in the field 
select control statement. If this entry is 
made when processing records that have been 
defined as fixed length, an error will be 
indicated. The CV entry can be entered as 
one of the following: 

• Before the first field tc be selected 
(e.g., //bFSbCV/r,s,t) . 

• Between selected fields (e.g. , 
//bFSbr,s,t/CV/r,s,t) . 

• Following selected fields (e.g., 
//bFSbr , s , t/r , s , t/CV) . 

The variable section of the record is 
placed in the output record following the 
fixed portion of the record as defined in 
the output description parameter. 



HEADING STATEMENT 

A heading line can be printed for programs 
with printed output. Heading lines are 
ignored if first-character forms ccntrcl is 
specified. A maximum of two statements can 



END Statement 

This statement must be the last of the 
utility control statements in the program. 

//bEND 
//b 

indicates that this is a control 

statement. 



END 



indicates the last utility modifier 
control statement. 



Examples 

The following are examples from a 
payroll file of utility modifier statement 
and field select statemient preparation (one 
card-to-tape, two tape-to-tape, and one 
disk-to-disk) for creating a file of 
fixed-length records for testing. 



CARD TO TAPE 

The input file contains eight fields. The 
fields numbered 1, 2, 7, 8, 4, and 3 are to 
be moved, in that order, to the output area 
and fields 2, 4, 7, and 8 are to be packed 
while being moved. 

1. Name in positions 1-15. 

2. Hourly rate in positions 16-20. 

3. Number of dependents in positions 
21-22. 

4. Earnings to date in positions 23-30. 

5. Address in positions 31-66. 

6. Date of service in positions 67-71. 

7. Hours worked in positions 72-74. 

8. Weekly earnings in positions 75-80. 

The utility modifier statement is 
entered as: 
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//bUCTbTF,FF,A=(80, 80) ,B=(80,80) 

The field select statement is entered 
as: 

//bFSbl,15,l/16, {P,5,3) ,16/72, (P,3,2) , 

19/75, (P, 6, 4), 21/23, (P, 8, 5) , 25/21, 2, 30 

TAPE TO T?IPE 

If an exact copy is to be made of the input 
file, a field select stateirent is not 
needed. The input-file format is the same 
as the card-to-tape prograir. 

J.Ai\^ w« — l__l._l_*-jr ittKJ\JLJ.J- J.^^±. vj *,C1 i-c:ill^li <- JL.J 

entered as : 

//bUTTbTC,FF,A=(80,8 0) ,B= (80,80) 

An alternate method occurs when the 
input file contains variable-length 
records. The minimum length logical record 
is 24 bytes, and the maximum block length 
is 300 bytes. The fixed pcrticn of the 
logical record is defined as 2 4 bytes and 
consists of two ten-byte fields and the 
record-length field. The two ten-byte 
fields are to be interchanged, and the 
variable portion of each logical record is 
to be copied. 

The utility modifier statement is 
entered as : 

//bUTTbTF,FV,A=(24, 300) ,B=(24, 300) 

The field select statement is entered 
as: 

//bFSb5,10, 15/15, 10, 5/CV 



DISK TO DISK 

The input file contains nine data fields 
and a key field. The first field (1) is 
the key field and is to be transferred to 
the output key field. Field 2 is to be 
dropped. Fields 3, 4, 9, 10, 6, and 5, in 
that order, are to be transferred to the 
output record. Fields 4, 5, 6, 9, and 10 
are to be packed while being moved. 

1. Man number in positions 1-10 of the 
ten-position key field. 

2. Department number in positions 1-5. 

3. Name in positions 6-20. 

4. Hourly rate in positions 21-25. 

5. Number of dependents in positions 
26-27. 



6 
7 
8 
9 
10 



Earnings to date in positions 28-35, 
Address in positions 37-71. 
Date of service in positions 72-76. 
Hours worked in positions 77-79. 
Weekly earnings in positions 8~85. 



*-A<^y^r^ OC—irin ^■•■y^-.-.r^^A 



\J \J JL\J \J 



L uoc:v-i 



The utility modifier statement is 
entered as: 

//bUDDbTF,FF,A=(K=10,D=100) ,E= {K=10,D=31) 



^U^ 4r ^ ^ 1 ^ ^ ^T ^„j 



J 3 



jcr j-j.Kra.<-j o cj. ci- 1, o i_ci ucmcii L xo ciiccieu 



as: 



//bFSb{K,l),10, (K,l)/6,15,1/21, (P,5,3),16 



Key Fields 

EASD processing begins in the area of DASD 
indicated in the EXTENT statement as the 
lower limit, and continues consecutively 
until the upper limit or EOF is reached. A 
field can be selected from, or placed into, 
the key portion of a DASD record. The 
field that is selected must be completely 
contained within the key field or data 
field. A field that is placed in a key 
field or a data field must be placed 
entirely in the key portion or data portion 
of the record. DASD files without keys are 
handled without consideration to the key 
field and can be thought of as being 
similar to tape files. 

Disk files with key fields require 
information unique to key fields 
processing. The records must be fixed 
length and unblocked or one of the 
fcllcwing types of records identified as an 
undefined record: 

Fixed-length blocked 

Variable-length blocked or unblocked 
Undefined. 

The records identified as undefined 
records with keys are restricted to being 
copied or displayed and are valid for 
EASD-to-DASD and DASD-to-printer programs 
only. 



EASD FILES WITH KEY FIELDS (FIXED-LENGTH 
UNBLOCKED) 

Key fields are only valid for: 

• DASD output. 

• DASD input and DASD output. 
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• BASD input and printer output (printer 
output is capable of printing key 
fields) . 

DASB_to_Card_or_Ta2e 

To transfer data from DASD to card or tape, 
field select must be used to transfer the 
key field to a data field for output. 
Depending upon the output desired, certain 
information is required. 

For tape output: 

1. Field select must be used. 

2. Reblocking and field select together 
can be specified for blocked output 
records. 

For card output: 

1. Field select must be used. 

2. Reblocking and field select together 
are not valid because disk input is 
unblocked and card output must be 
unblocked. 

Card or Tape to D ASD 

Vihen data is transferred froir card or tape 
to EASD, field select must be used to 
create the key field for output. Depending 
upon the output desired, certain 
information is required. 

For card input: 

1. Field select must be used. 

2. Reblocking and field select together 
are not valid, because both card input 
and disk output must be unblocked. 

For tape input: 

1. Field select must be used. 

2. Reblocking and field select together 
must be specified when the input is 
blocked. 

DASD to P rinter 

Vihen a DASD file is printed, it is possible 
to print the key fields by either the 
display or list print format. 

Display The key field must be specified on 
the utility modifier card in the 
format (K=1,D=1)- This will cause 
both the key and data field to be 
printed. 

List Field select can be used to select 
a field from the key for printing. 
If field select is net used, the 
key and data must fit on the print 
line. 



DASD_tO_DASD 

When records from DASD to DASD are 
transferred with these key field 
conditions, the following functions can be 
perfcrired: 



copy 

Field select 



The file is transferred 
without change. 

The file can be transferred 

with: 

Data fields dropped or 

rearranged. 

Record length changed. 

Key fields changed. 



Key Field s on Input and No Key _Fields_on 
Output : 



Field select 



Field select must be used 

to: 

Remove the key field from 

the data , 

Remove the key field and 

drop or rearrange data 

fields. 

Remove the key field and 

change the record length. 



Reblcck & field 

select This function can be used 

to do those options under 
field select and provide 
blocked output records. 



No Key Fieldson Input and Key Fiel ds on 
Outp ut (Unblocked Input) : 



Field select 



Field select must be used 
to: 

Create key fields. 
Create key fields and drop 
or rearrange data fields. 
Create key fields and 
change the record length. 



No Key Fields _on Input and Key Fields on 
Output (Blocked Input) : 

Reblcck & field 

select This function must be used 

to do those options under 
field select and provide 
unblocked output. 



EASD FILES WITH KEY FIELDS (UNDEFINED) 

Copy and display are the only valid 
functions that can be performed. The 
undefined-with-keys format is valid only 
for the DASD-to-DASD program and the 
EASD-to-printer program. 
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Recording Job Control Statements on // assgn sysoo5,x' 282 ' 

Output File // upsi 10100000 

// EXEC CDTP 

The follcv'ing example shows how a // UCT TC,FF,A=(8( 

file-to-file utility prograrr can te used tc // END 

include job control statements on an output // JOB MY JCL 

file. The /* to be recorded on output must // EXEC ASSEMBLY 
contain at least one additional punch in 

coluirns 3-80, since a /* card with blanks . [ data 

in columns 3-80 signifies end-of-file for 

/£ / 

// JOB CARBTAPE /* j EOF and 

// ASSGN SYS004,X'00C' /g EOJ for utility 
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Part 1. File-to-File Utility Programs 
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Card to Disk 



The card-to-di 
contents of a 
area of disk. 
EBCDIC or in b 



sk program transfers the 
card file froir cards to an 

The cards may be punched in 
inary. The input records 



.^j- 1^^ 



;c: J.o-A.'cv. 






cinw CCH-ll 



logical record 
maxiiruin-size i 
160 bytes for 
copied, rebloc 
reblocked and 



must fit on one card. The 
nput record is 80 bytes, or 
binary. These files may be 
ked, field selected, or 
field selected. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
If this statement is omitted from the 
program, the following parameters are 
assumed: 

//bUbTC,FF,A=(80,80) ,B=(80,80) ,I1,CY,R1, 
E=(2311) 

The format and entries for the utility 
modifier statement for this program are: 

//bUCDbTt,Ff,A=( input) ,B= (output) , Ix,Ox, 
Q=(x,y) ,Rx,E=(e) 

Figure 7 shows detailed information of 
the entries in the utility mcdifier 
statement for the card-to-disk program. 

//bU These entries identify this as a 
utility modifier statement. 

CDb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
programi. 



Field Select Statement 



This statement 
the file-to-fi 
from an input 
different rela 
record. As ma 
necessary may 
punched in car 
filled even if 
cards follow, 
complete in on 
contents of th 



provides the information for 
le program to transfer fields 
record to the same or a 
tive location of the output 
ny field select statements as 
be used. If the statement is 
ds, each card need net be 
additional field select 
The field selected must be 
e statement. The format and 
is statement are: 



£2I]i^Iii§ Explanation 
//bFSb //b identifies this as a 
control statement. 

FS icientij-xes tuis as a i.iexu. 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 
For binary records this nuraber 
is relative to the record as 
it appears in main storage, 
not on the card. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 

When a field is to be placed into a key 
field (disk output) , the letter K followed 
by a comma and the starting position of the 
field in the output record must be placed 
in parentheses. 



Exam£le: //bFSbr, s, (K, t) 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, (P,n,m) ,t 

P 

identifies the pack operation. 



is the size of the input field. 



//bFSbr ,s, t/r, s, t/r, s, t 



is the size of the output field, 
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PARAMETER 



Function 
Tt 



Format 
Ff 



Input 
Description 



Output 
Description 



Card Input 



Disk Check 
Ox 



Sequence- 
Numbering 



First Record 
Rx 



Device Type 
Description 



POSSIBLE 
FORMS 



TC 
TF 
TR 
TRF 



FF 



A=(n,m) 



B={n,m) 



B=(K=I,D=I) 



OY 
ON 



ENTRIES 



T 
C 

F 
R 
RF 



EXPLANATION 



A= 

(n,m) 



(n,m) 



'(K=I,D=I.) 



The initial T identifies this as the type of function parameter, 

Copy 

Field Select 

Reblock 

Reblock and Field Select 



The initial F of this form identifies this as the format parameter. 
The second F of the form must be indicated for fixed-length records. 



The letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 



This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 

This letter and symbol indicate this is the output-description parameter. 

For fixed-length disk output records with keys, the letter K and symbol = must precede the lengtti 
of the key field. The letter D and symbol = must precede the length of the data field. These two 
fields must be separated by a comma and enclosed in parentheses. 



Q=(x,y) 



Rx 



E=(e) 



Q= 



E= 
(e) 



The first letter in these forms identifies this parameter. 
EBCDIC Input 
Binary Input 



The first letter in these forms identifies this parameter. 

Write-disk check. 

Do not write-disk check . 



This letter and symbol identify this parameter. 

This represents the first position of a field in a card (relative to one) for sequence- numbering (1 or 2 
digits). 

Separator 

This represents the length of the field (maximum 10). The (x,y) portion of this parameter must be 
enclosed in parentheses. 



The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be by- 
passed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 



This letter and symbol indicate this is the device type description parameter. 

For output devices the valid entries are 231 land 2314, This entry must be enclosed in parentheses. 
If a 2319 is used, 2314 must be specified. 



Figure 7. Card-to-Disk Utility Modifier Statement 
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UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r , (U,n,m) , t 



U 

identifies the unpack operation. 

n 

is the size of the input field. 

m 

is the size of the output field. 

Control Statement Stream 

A sairple control statement input stream for 
running the card-to-disk prcgrair from the 
relocatable disk resident library follows; 
device and file descriptions are peculiar 
to the job being run. 

//bJOBbEXAMPLE 

//bASSGNbSYSLNK, X' 190 • 

//bASSGNbSYS001,X'180' 

//bASSGNbSYS00 4,X'00A' 

//bASSGNbSYSOO 9, X' 191 ' 

//bOPTIONbLINK 

blNCLUDEbUWCD 

bPHASEbCDDK5,IJWCDCS2, NOAUTO 

bINCLUDEbUSERLABR (module naire for user's 

label processing routine) 
bENTRY 

Z/bEXECbLNKEDT 
//bUPSIbOOOIOOOO (standard and 

user-standard labels on output) 
//bDLBLbUOUT, ' DISKbFILE' ,67/300 
//bEXTENTbSYS0 09,006 8 01,8,0,01204,0020 4 
//bEXEC 

//bUCDbTF,FF,A=(80,8 0) ,B= (K=26 ,D=8 G) 
//bFSbl,80,l/3 0,26, (K,l) 
//bEND 

(data cards on SYsOOiJ) 
/* 
/g 
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Card to Printer and/or Punch 



Input records to this prograrr rrust be 
fixed-length and unblocked. Card input and 
output can be either EBCDIC or binary, 
except for both printing and punching when 
it rrust be EBCDIC. The maximum record size 
is 80 bytes for EBCDIC, 160 bytes for 
binary. Card to punch requires the 1/2-4 
burst mode sviitch of the 2821 to be in 2-4, 
or burst setting, to allow maximum 
throughput speed on the 2540. 



Card to Printer 

The card-to-printer prograir can produce 
printed output in two formats: display and 
list. Sequence checking is performed en 
the input. 



Utility Modifier Statement 

This statement contains information 
required for the operation of the program. 
If this statement is omitted from the 
program, both printing and punching are 
performed (a printer and a punch must be 
assigned) . The following parameters are 
then assumed with respect to the particular 
output: 

Card to P unc h : 

//bUbTC,FF,A=(80,8 0) ,B=(80,8C) ,Il,0l,S2,Rl 

Car d to Printer : 

//bUbTL,EF,A=(80,8 0) ,B=( 120) ,I1,0C ,PY ,S2 ,R1 

The format and entries for the utility 
modifier statement are: 



DISPLAY 



Card to Punch; 



The card-to-printer program with the 
display option transfers the contents of a 
card file to a printer with each record 
being placed on one print line. The field 
select option cannot be performed with 
display. In this format the first 20 
positions of the print line are reserved 
for information describing the file. When 
hexadecimal printout is called for, the 
entire card is printed on two lines. 



LIST 

The input records to this program are 
transferred to the printer with each record 
being fully printed. The field select 
option may be used. The full print line is 
available for printing. When hexadecimal 
printout is called for, the output record 
size is bound by the size of the print 
line. 



Card to Punch 

In the card-to-punch program records may be 
copied or field selected. Sequence fields 
are generated but input is net checked. 



Card to Printer and Punch 

This program produces printed output in the 
list format- Sequence fields are generated 
but input is not checked. 



//bUCPbTt,Ff ,A=(n,m) ,B=(n,m) ,Ix,Ox,Rx, Sx, 
Q=(x,y) 

Ca rd to Printer : 

//bUCPbTt,Ff ,A=(n,m) ,B=(p) ,Ix,Ox,Px,Rx,Sx, 
Q=(x,y) 

C ar d to Printer and Punch : 

//bUCPbTt,Ff ,A=(n,m) ,B={n,m) ,Ix,Px,Rx,Sx, 
Q=(x,y) 

Figure 8 shows detailed information of 
the entries in the utility modifier 
statement for the card-to-printer and/or 
punch program. 

Entry Reas on 

//bU These entries identify this as a 
utility modifier statement. 

CPb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



Field Select Statement 

This statement provides the information for 
the file-to-file program to transfer fields 
from an input record. As many field select 
statements as necessary may be used. If 
the statement is punched in cards, each 
card need not be filled even if additional 
field select cards follow. The field 
selected must be complete in one statement. 



Card to Printer and/or Punch 3b 



The format and contents of this statement 
are: //bFSbr , s, t/r ,s, t/r , s,t 

S22i§rits ExEl3:Di:tion 

//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 
For binary records, this 
number is relative to the 
record as it appears in main 
storage, not on the card. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, (P,n,m) , t 

P 

identifies the pack operation. 



is the size of the input field. 



is the size of the output field. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record. 



the field select parameter will appear in 
this form: 

r, (U,n,m) ,t 

U 

identifies the unpack operation. 



is the size of the input field. 



is the size of the output field. 

Note: Field selections when running card 
to printer and/or punch will be reflected 
on the output for both. 



HEXADECIMAL 

When a program has printed output, the 
field selected may be printed in 
hexadecimal representation. This operation 
is indicated as follows: 

r, (X,n),t 



identifies the hexadecimal operation; 



is the size of the input field. 

Only the field length of the input is 
necessary for this operation because the 
cutput length will always be assumed to be 
twice as large. X and n are enclosed in 
parentheses and separated by a comma. 



Control Statement Stream 

A sample control statement input stream for 
running the card-to-printer and/or punch 
program from the core image library 
fellows; device and file descriptions are 
peculiar to the job being run. 



//bJOBbEXAMPLE 

//bASSGNbSYS004,X'00C» 

//bASSGNbSYSOOS , X' OOE' 

//bASSGNbSYSOO 6, X ' OOD ' 

//bEXECbCDPP 

//bEND 

(data cards on SYS004) 
/* 
/S 



(reader) 

(printer) 

(punch) 

(assumed values) 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TB 

TBF 

TC 

TD 

TF 

TL 

TLF 


T 
B 

BF 
C 


The initial T identifies this as the type of function parameter. 

Both Print and Punch 

Both Print and Punch with Field Select 

Gspy (punch output only) 






D 


Display 

Field Select (punch output only) 

List 






LF 


List and Field Select 


Format 
Ff 


FF 




The initial F of this form identifies this as the format parameter. 
The second F of the form must be indicated for fixed-length records. 


Input 
Description 


A=(n,m) 


A= 


This letter and symbol indicate this is the input-description parameter. 






(n,m) 


For fixed-length input records, the input record length (the letter n) and the input block 
length (the letter m) must be enclosed in parentheses and separated by a comma. 


Output 
Description 


B=(n,m) 


B= 


This letter and symbol indicate this is the output-description parameter. 






(n,m) 


For fixed-length output records, the output record length (the letter n) and the output block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 




BHp) 


B- 


This letter and symbol indicate this as the output-description parameter. 






(P) 


For printer output, the size of the print line (120, 132, or 144) must be entered. 
A print line size of 120 is forced if TD is specified. 


Card Input 
Ix 


11 
12 


1 

1 


The first letter in these forms identifies this parameter. 
EBCDIC Input 






2 


Binary Input 


Printer or 
Punch Output 
Ox 


Ol 
02 
OX 





The firet letter in these forms identifies this parameter. For printer output, the type of output 
indicated by the field-select parameter (hexadecimal or character) oven-ides this parameter. 




OC 


1 


EBCDIC Output (punch onjy) 






2 


Binary Output (punch only) 






X 


Hexadecimal Output {printer only) 






C 


Character Output (printer only) 


Page 

Numbering 

Px 


PY 

PN 


P 
Y 


The first letter in these forms identifies this parameter. 
Number pages. 






N 


Do not number pages. 



Figure 8. Card-to-Printer and/or Punch Utility Modifier Statement (Part 1 of 2) 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Sequence- 
Numbering 
Q=(x,y) 


Q=(x,y) 


X 

y 


This letter ond symbol identify this parameter. 

This represents the first position of a field in a card (relative to one) for sequence-numbering (1 or 2 
digits). 

Separator 

This represents the length of the field (maximum 10). The (x,y) portion of this parameter must be 
enclosed in parentheses. 


First Record 
Rx 


Rx 


R 

X 


The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will bp by- 
passed). If the file is to be copied, the function parameter must be indicated to be reblocked and 
the input and output file description parameters must contain identical values. 


Spacing and 
Stacker 
Control 
Sx 


SI 
S2 
S3 


S 

1 

2 
3 


The first letter in these forms identifies this parameter. 

Printer Output: Single Spacing 
Punch Output: Select Stacker 1 
Printer and Punch: Printer Control Only 

Printer Output: Double Spacing 
Punch Output: Select Stacker 2 
Printer and Punch; Printer Control Only 

Printer Output: Triple Spacing 

Punch Output: Invalid 

Printer and Punch: Printer Control Only 



Figure 8. Card-to-Printer and/or Punch Utility Modifier Statement (Part 2 of 2) 
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Card to Tape 



The card-to-tape program transfers the 
contents of a card file frcir^ cards to tape. 
The cards may be punched in EBCDIC or 
binary. The input records irtust be fixed- 
length unblocked, and each logical record 
must fit on one card. The maxirruir size 
record is 80 bytes, or 160 for binary. 
These files may be copied, reblocked, field 
selected, or reblocked and field selected. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
If this card is omitted from the program, 
the following parameters are assumed: 

//bUbTC,FF,A=(80,80) ,B={80,80) ,Il,CU,Rl 

The format and entries for the utility 
modifier statement for this program are: 

//bUCTbTt , Ff , A= ( input) , B= ( output) , 
Ix, Rx,Ox,Q= (x,y) 

Figure 9 shows detailed information of 
the entries in the utility modifier 
statement for the card-to-tape program. 

Entry Reason 

//bU These entries identify this as the 
utility modifier statement. 

CTb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



Field Select Statement 

This statement provides the information for 
the file-to-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 
filled even if additional field select 
cards follow. The field selected must be 
complete on one statement. The format and 
contents of this statement are: 

//bFSbr,s, t/r, s,t/r,s,t 

C ontent s Explanatio n 
//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 



r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 
For binary records, this 
number is relative to the 
record as it appears in main 
storage, not on the card. 

, (comma) separates entries in 
the parameter. 

s indicates the length of the 
field in bytes . 

, separator. 

t indicates the starting 
position, relative to one of 
the output record. 

/ (slash) separates selected 
fields. 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, (P,n,m) , t 

P 

identifies the pack operation. 



is the size of the input field. 



is the size of the output field. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U,n,m) ,t 

U 

identifies the unpack operation. 



is the size of the input field. 



is the size of the output field. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 
C 
F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 


F 
F 


The leading F of this form identifies this as the forniat parameter. 
The second F of the form must be indicated for fixed-length records. 


Input 
Description 


A=(n,m) 


A= 
(n,m) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 


Output 
Description 


B=(n,m) 


8= 
(n,m) 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 


Card Input 
Ix 


11 
12 


1 
1 
2 


The first letter in these forms identifies this parameter. 
EBCDIC input 
Binary Input 


Rewind 
Output 
Ox 


OR 
ON 
OU 


O 

R 
N 
U 


The first letter in these forms identifies this parameter. The rewind option for the output tape is 
active both before and after data transfer. 

Rewind both before and after data transfer. 

Do not rewind either before or after data transfer. 

Rewind before and rewind and unload after data transfer. 


Sequence- 
Numbering 
Q=(x,y) 


Q=(x,y) 


Q= 

X 

y 


This letter and symbol identify this parameter. 

This represents the first position of a field in a card (relative to one) for sequence-numbering 
(1 or 2 digits). 

Separator. 

This represents the length of the field (maximum 10). The (x,y) portion of this parameter must be 
included in parentheses. 


First Record 
Rx 


Rx 


R 

X 


The first letter in this forni identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be by- 
passed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 



Figure 9. Card-to-Tape Utility Modifier Stateirent 
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Control Statement Stream 

A sample control stateirent input streair for 
running a card-to-tape program froir the 
disk resident relocatable library follows; 
device and file descriptions are peculiar 
to the job being run. 

//bJOBbEXAMPLE 

//bASSGNbS YSLNK , X ' 1 9 ' 

//bASSGNbSYSOOl, X' 18 ' 

//bOPTIONbLINK 

bINCLUDEblJWCT 

bPHASEDCDTPS , IJWCTCS2 , NOAUTO 

bINCLUDEblJWLAB 

bENTRY 

//bLBLTYPbTAPE 

Z/bEXECbLNKEDT 

//bUPSIbOOIOIOOO (unlabeled output with 

no tapemark at start of file) 
//bASSGNbSYS004,X'00C' (reader) 
//bASSGNbSYS005,X'183' ,ALT (alternate tape 

drive) 
//bEXEC 

//bUCTbTR,FF,A=(80,80) ,B=(80,800) ,CR 
//bEND 

(data goes in SYS004) 
/* 
/6 



A sample control statement input stream 
for running a card-to-tape program from the 
core image library follows; device and file 
descriptions are peculiar to the job being 
run. 



//bJOBbEXAKPLE 

//bASSGNbSYS004,X' OOC (reader) 
//bASSGNbSYS005,X'182' (tape drive) 

(assume standard labels) 
//bEXECbCDTP 
//bEND 

(data goes in SYS004) 
/* 
/g 
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Data Cell to Data Cell 



The data cell- 
transfers file 
assigned data 
of the same un 
for input and 
in performance 
reblocked, fie 
field selected 
reblcck option 
must be fixed 



to-data cell program 
s between any number of 
cell units or between areas 
it. Using the same device 
output can cause a reduction 

Files can be copied. 
Id selected, or reblocked and 

If the field select or 
s are used, the input records 
length or variable length. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program, 
If this statement is omitted from the 
program, the following parameters are 
assumed: 

//bUbTC,FU,A=(1000),B=(1000),OY,Rl, 
£=(2321,2321) 



The format and entries for the utility 
modifier statement for this program are: 

//bUMMbTt,Ff ,A=(input) ,B=(cutput) ,Cx,Rx, 
E=(c,d) 

Figure 10 shows detailed information of 
the entries in the utility modifier 
statement for the data cell-to-data cell 
program. 

//bU These entries identify this as a 
utility modifier statement. 

MMb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



Field Select Statement 



This statement 
the file-to-fi 
from an input 
different rela 
record. As ma 
necessary may 
punched in car 
filled even if 
statements fcl 



provides the information for 
le program to transfer fields 
record to the same or a 
tive location cf the output 
ny field select statements as 
be used. If the statement is 
ds, each card need not be 

additional field select 
low. The field selected must 



be complete in one statement. The format 
and contents of this statement are: 

//bFSbr , s , t/r , s , t/r , s , t 

Q22tents Explanation 

//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 

Vvhen a field is to be selected from a 
key field (data cell input), the letter K 
followed by a comma and the starting 
position cf the field to be selected must 
be placed in parentheses. 



Example: //bFSb (K,r) , s, t 

When a field is to be selected from a 
key field (data cell input) and is to ce 
placed into a key field (data cell output), 
the starting position of the field in the 
input record and output record must be 
preceded by the letter K and a comma and 
enclosed in parentheses. 

Ex^SEle: //bFSb(K,r) ,s, (K,t) 

When a field is to be placed into a key 
field (data cell output), the letter K 
followed by a comma and the starting 
position cf the field in the output record 
must be placed in parentheses. 

Example: //bFSbr , s , (K ,t) 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 
C 
F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblockand Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 
The second F must be indicated for fixed- length records. 
The letter V must be indicated for variable- length records. 
The letter U must be indicated for undefined records. 


Input 
Description 


A=(n,m) 

A=(g) 
A=(K=I,D=I) 


A= 

(n,m) 

A= 

(g) 

A= 
(K=I,D=I) 


This letter and symbol indicate this is the input-description parameter. 

For fixed- length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable-length records the letter n indicates the size of the fixed portion of each record, and the 
letter m indicates the maximum block size. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block length 
must be enclosed in parentheses. 

This letter and symbol indicate this is the input-description parameter. 

For fixed- length data cell input records with keys, the letter K and symbol = must precede the 
length of the key field. The letter D and symbol = must precede the length of the data field. 
These two fields must be separated by a comma and enclosed in parentheses. 


Output 
Description 


B=(n,m) 

B=(K=I,D=I) 
B=<g) 


B= 

(n,m) 

B= 
(K=1,D=I) 

B= 

(g) 


This letter and symbol indicate this is the output-description parameter. 

For fixed- length output records, the output record length (the letter n) and the output block length 
(the letter m) must be enclosed in parentheses and seporcted by a comma. For field select with 
variable- length records the letter n indicates the size of the fixed portion of each record, and the 
letter m indicates the maximum block size. 

This letter and symbol indicate this is the output description parameter.. 

For fixed-length data cell output records with keys, the letter K and symbol = must precede the 
length of the key field. The letter D and symbol = must precede the length of the data field. 
These two fields must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the output-description parameter. 

For undefined output records or variable output records without field select, the maximum block 
length must be enclosed in parentheses. 


Data Cell 

Check 

Ox 


OY 
ON 


O 
Y 
N 


The first letter in these forms identifies this parameter. 

Write-data cell check (forced for this program). 

Do not write-data cell check (ignored for this program). 


First Record 
Rx 


Rx 


R 

X 


The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-l records will be by- 
passed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 


Device Type 
Description 


E=(c,d) 
E=(e) 


E= 
(c,d) 

E= 

(e) 


This letter and symbol indicate this is the device type description parameter. 

For input devices (the letter c) and output devices (the letter d) the valid entry is 2321 . These 
eritries must be enclosed in parentheses and separated by a comma. 

This letter and symbol indicate this is the device type description parameter. 

For tnptrf and output devices the valid entry is 2321 . This entry must be enclosed in parentheses. 



Figure 10. Data Cell-to-Data Cell Utility Modifier Statement 
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PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, {P,n, m) , t v. 

P 

identifies the pack operation. 



is the size of the input field. 



is the size of the output field. 



• Before the first field to be selected, 

• Between selected fields. 

• following selected fields. 

Examples : 

//bFSbCV/r , s , t/r , s , t 
//bFSbr , s , t/CV/r , s , t 
//bFSbr , s , t/r , s , t/CV 

The variable section of the record is 
placed in the output record following the 
fixed portion of the record as described in 
the output description parameter. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U, n,m) , t 

a 

identifies the unpack operation. 



n 



is the size of the input field. 



is the size of the output field. 



COPY VARIABLE 

When the section of a variable-length 
record, not defined as the fixed portion, 
is to be transferred to the output record, 
the letters CV (copy variable) must be 
present in the field select statement. If 
this entry is made when processing records 
that have been defined as fixed length, an 
error will be indicated. The CV entry can 
be entered: 



Control Statement Stream 

A sample control statement input stream for 
running a data cell-to-data cell program 
from the cere image library follows; device 
and file descriptions are peculiar to the 
job being run. 

//bJOBbEXAMPLE 

//bASSGNbSYS010,X'19 3' 

//bUPSIbOOOOOOOO (standard labels) 

//bDLBLbUIN,'DCbFILE', 67/365 

//bEXTENTbB=4, SYS 010, 010 203, 1,0,19006,00094 

//bDLBLbUCUT, 'DATAbCELLbCUTPUT' ,67/300 

//bEXTENTbB=5,SYS010, 000123, 1,0, 19 006, 00 094 

//bEXECbDCDC 

//bUMMbTF,FF,A=(80, 80) ,B= (K = 10,D = 70) ^Oi^ 

//bFSb75,6, (K,l)/l,70,l 

//bEND 

/g 



Note: If you want to process sequential 
files to support forced-end-of-voluroe 
(FEOV) , bit 7 of the UPSI byte must be set 
en (//bUPSIbOOOOOOOl) . This bit 7 must be 
set off, if the file to be copied was built 
by using the direct access method (DAM) or 
indexed sequential access method (ISAM). 



44 



DOS and TOS Utility Programs 



Data Cell to Disk 



The data cell-to-disk program transfers a 
file between any number of assigned data 
cells and disks. Files can be copied, 
reblocked, field selected, or reblccked and 
field selected. If the field select or 
reblock options are to be used, the input 
records must be fixed or variable length. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
If this statement is omitted from the 
program, the following parameters are 
assumed: 

//bUbTC,FU,A={1000),B=(1000) ,0Y,R1, 
E=( 2321, 2311) 

The format and entries for the utility 
modifier statement for this prograir are: 

//bUMDbTt,Ff,A=( input) ,B= (output) ,Ox,Rx, 
E=(c,d) 

Figure 11 shows detailed information of 
the entries in the utility modifier 
statement for the data cell-to-disk 
program. 

E ntry R eas on 

//bU These entries identify this as a 
utility modifier statement. 

MDb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



Field Select Statement 

This statement provides the information for 
the file-to-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 
filled even if additional field select 
cards follow. The field selected must be 
complete on one statement. The format and 
contents of this statement are: 



//bFSbr,s,t/r,s,t/r,s,t 

Content s Explanation 
//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero), of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 

When a field is to be selected from a 
key field (data cell input), the letter K 
followed by a comma and the starting 
position of the field to be selected must 
be placed in parentheses. 



Example; //bFSb(K,r), s, t 

When a field is to be selected from a 
key field (data cell input) and is to be 
placed into a key field (disk output), the 
starting position of the field in the input 
record and output record must be preceded 
by the letter K and a comma and enclosed in 
parentheses. 

Example: //bFSb(K,,r), s, (K,t) 

When a field is to be placed into a key 
field (disk output) , the letter K followed 
by a comma and the starting position of the 
field in the output record must be placed 
in parentheses. 

Example: //bFSbr, s, (K, t) 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 

C 
F 
R 
RF 


The initiol T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 
The second F of the first possible form must be indicated for fixed-length records. 
The letter V must be indicated for variable-length records. 
The letter U must be indicated for undefined records. 


Input 
Description 


A=(n,m) 

A=(g) 
A=(K=I,D=I) 


A= 
(n,m) 

A= 

(9) 

A= 
(K=I,D=I) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and 
the letter m indicates the maximum block size . 

This letter and symbol indicate this is the input-description parameter. 

For undefined ir^ut records or variable input records without field select, the maximum block 
length must be enclosed in parentheses. 

This letter and symbol indicate this is the input-description parameter. 

For fixed-length data cell input records with keys, the letter K and symbol = must precede the 
length of the key field. The letter D and symbol = must precede the length of the data field. 
These two fields must be separated by a comma and enclosed in parentheses. 


Output 
Description 


B=(n,m) 
B=<K=I,D=I) 

B=(g) 


8= 
(n,m) 

B= 
(K=I,D=I) 

B= 

(g) 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block 
length (the letter m) must be enclosed in parentheses and separated by a comma. For field 
select with variable length records tfie letter n indicates the size of the fixed portion of each 
record, and the letter m indicates the maximum block size . 

This letter and symbol indicate this is the output description parameter. 

For fixed-length disk output records with keys, the letter K and symbol = must precede the length 
of the key field. The letter D and symbol = must precede the data field. These two fields must 
be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the output-description parameter. 

For undefined output records or variable output records without field select, the maximum block 
length must be enclosed in parentheses. 


Disk Check 
Ox 


OY 

ON 


o 

Y 
N 


The first letter in these forms identifies this parameter. 

Write-disk check. 

Do not write-disk check. 


First Record 
Rx 


Rx 


R 
x 


The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be 
bypassed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 


Device Type 
Description 


E=(c,d) 


E= 

(c,d) 


This letter and symbol indicate this is the device type description parameter. 

For input devices (the letter c) the valid entry is 2321. For output devices (the letter d) the valid 
entries are 2311 and 2314. If a 2319 is used, 2314 must be specified. 
These entries must be enclosed in parentheses and separated by a comma. 



Figure 11. Data Cell-to-Disk Utility iNdodifier Stateirent 
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PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 

form: 

r, (P,n,m) , t 

P 

identifies the pack operation, 
n 

is the size of the input field. 
ra 

is the size of the output field. 



• Before the first field to be selected. 

• Between selected fields. 

• Following selected fields. 

Exanigl es : 

//bFSbCV/r , s , t/r , s , t 
//bFSbr , s , t/C V/r , s , t 
//bFSbr , s , t/r , s , t/C V 

The variable section cf the record is 
placed in the output record following the 
fixed portion of the record as described in 
the output description parameter. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U,n,m) , t 

U 

identifies the unpack operation. 



is the size of the input field. 



is the size of the output field. 



COPY VARIABLE 

When the section of a variable-length 
record, not defined as the fixed portion, 
is to be transferred to the output record, 
the letters CV (copy variable) irust be 
present in the field select statement. If 
this entry is made v\?hen processing records 
that have been defined as fixed length, an 
error will be indicated. The CV entry can 
be entered: 



Control Statement Stream 

A sairple control statement input stream for 
running a data cell-to-disk program from 
the core image library follows; device and 
file descriptions are peculiar to the job 
being run. 

//cJOBbEXAMPLE 

//bASSGNbSYS010,X'19 3' 

//bASSGNbSYS015,X' 191' 

//bUPSIbOOOOOOOO (standard labels) 

//bDLBLbUIlSI,'EXAMPLEbFILE' ,67/365 

//bEXTENTtB=4,SYS010, 010203, 1,0, 12 04 0, 00060 

//bDLBLbUOUT, 'DISKbFILEbEXAMPLE' ,67/300 

//bEXTENTbSYS010,000123,l,0,015 02,00038 

Z/bEXECbDCDK 

//bUlviDbTC,FF,A=(K=10,D = 100) ,B= (K = 10 ,D=100) , 

OY 
//bEND 
/g 

Note: If you want to process sequential 
files to support forced-end-cf-volume 
(FEOV) , bit 7 of the UESI byte must be set 
on (//bUPSIbOOOOOOOl) . This bit 7 must be 
set off,- if the file to be copied was built 
by using the direct access method (DAM) or 
indexed sequential access method (ISAM). 
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Data Cell to Printer 



The data cell-to-print 
display a data cell fi 
display or data list f 
provides a visual pict 
every byte appears in 
this format can handle 
undefined records. Da 
sirrple edited list of 
file can come from one 
If data list is used, 
fixed or variable leng 
list function only) mu 
size of the print line 



er program can 
le in either data 
ormat. Data display 
ure of the data where 
the printed output; 

fixed, variable, and 
ta list provides a 
the file. The input 

or rrore data cells, 
input records must be 
th and (for the data 
St not exceed the 



Contents 
//DFSb 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
If this statement is omitted from the pro- 
gram, the following parameters are assumed: 

//bUbTD,FU,A=(1000) ,B=(120) ,CX ,S1 ,FY ,R1, 
E=(2321) 

The format and entries for the utility 
modifier statement for this program are: 

//bUMPbTt,Ff,A=( input) ,B=(output) ,Cx,Sx,Px, 
Rx,E=(e) 

Figure 12 shows detailed information of 
the entries in the utility modifier state- 
ment for the data cell-to-printer program. 

Sll^ry :R§§;Son 

//bU These entries identify this card as 
a utility modifier statement. 

MPb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 

Field Select Statement 

This statement provides the information for 
the file-to-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. This is valid only for data list 
mode. As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 
filled even if additional field select 
cards follow. The field selected must be 
complete in one statement. The format and 
contents of this statement are: 

//bFSbr,s, t/r, s,t/r,s,t 



r , s, t/ 



Explanation 

//b identifies this as a 

control statement. 

FS identifies this as a field 
select control statement. 

r indicates the starting 
position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in oytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the print line. 

/ (slash) separates selected 
fields. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r , (U,n,m) , t 
U 

identifies the unpack operation. 
n 

is the size of the input field, 
m 

is the size of the output field. 



HEXADECIMAL 

When a program has printed output, the 
field selected may be printed in 
hexadecimal representation. This operation 
is indicated as follows: 

r, (X,n) , t 

X 

identifies the hexadecimal operation. 

n 

is the size of the input field. Only 
the field length of the input is 
necessary for this operation because 
the output length will always be 
assumed to be twice as large. X and n 
are enclosed in parentheses and 
separated by a comma. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TD 
TL 
TLF 


T 
D 
L 
LF 


The initial T identifies this as the type of function parameter. 

Display 

List 

List and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 

V 

u 


The leading F of these three possible forms identifies this as the format parameter. 

The second F must be indicated for fixed- length records. 

The letter V must be indicated for variable- length records. 

The letter U must be indicated for undefined records. 

With undefined records, the only valid entry above is data display. 


Input 
Description 


A=(n,m) 

A=(K=I,D=I) 
A=(g) 


A= 

(n,m) 

A= 
(K=l,D=i) 

A= 

(g) 


This letter and symbol indicate this is the input-description parameter. 

For fixed- length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and the 
letter m indicates the maximum block size. 

This letter and symbol Indicate this is the input-description parameter. 

For fixed-length data cell input records with keys, the letter K and symbol = must precede the 
length of the key field. The letter D and symbol = must precede the length of the data field. 
These two fields must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block 
length must be enclosed in parentheses. 


Output 
Description 


B-(p) 
B=(n,p) 


B- 
(P) 

B= 
(n,p) 


This letter and symbol indicate this is the output-description parameter. 

For printer output, the size of the print line (120, 132, or 144) must be entered. 
A print line size of 120 is forced, if TD is specified. 

This letter and symbol indicate this is the output description parameter. 

For field select of variable length records with printer output records the fixed portion of each 
output record (the letter n) and the size of the print line (the letter p) must be enclosed in 
parentheses and separated by a comma. 


Printer 
Output 
Ox 


OX 
OC 


O 
X 

c 


The first letter in these forms identifies this parameter. The character printout is forced 
for data list. The type of output indicated by the field-select parameter (hexadecimal or 
character) overrides this parameter. 

Hexadecimal Printout 

Character Printout 


Page- 
Numbering 
Px 


PY 
PN 


P 

Y 
N 


The first letter in these forms identifies this parameter. 

Number pages (forced for data display). 

Do not number pages (forced for first character forms control). 


First Record 

Printed 

Rx 


Rx 


R 
x 


The first letter in these forms identifies this parameter. 

This represents the position of the first logical record to be printed; x- 1 records will be bypassed. 



Figure 12. Data Cell-to-Printer Utility Modifier Statement (Part 1 of 2) 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Spacing 
Sx 


SI 
S2 
S3 
SA 
SB 
SC 
SO 


S 
1 

2 
3 
A 
B 
C 
D 


The first letter in these forms identifies this parameter. 

Single Spacing (forced for data display) 

Double Spacing 

Triple Spacing 

Type A First Character Forms Control 

Type B First Character Forms Control 

Type C First Character Forms Control 

Type D First Character Forms Control 


Device Type 
Description 


E={e) 


E= 
(e) 


This letter and symbol indicate this Is the device type description parameter. 

For input devices the valid entry is 2321 , This entry must be enclosed in parentheses. 



Figure 12. Data Cell-to-Printer Utility Modifier Statement (Part 2 of 2) 



COPY VARIABLE 

When the section of 
record, not defined 
is to be transferred 
the letters CV (copy 
present in the field 
this entry is made i^ 
that have been defin 
error will be indica 
be entered: 



a variable-length 
as the fixed portion, 
to the output record, 
variable) must be 
select stateirent. If 
hen processing records 
ed as fixed length, an 
ted. The CV entry can 



• Before the first field to be selected. 

• Between selected fields. 

• Following selected fields. 

Exarri£l es : 

//bFSbCV/r , s, t/r, s, t 
//bFSbr,s, t/CV/r,s,t 
//bFSbr,s, t/r, s,t/CV 

The variable section of the record is 
placed in the output record following the 
fixed portion of the record as described in 
the output description paraireter. 



Control Statement Stream 

A sairple control stateirent input strearr fcr 
running a data cell-to-printer program from 
the core image library follows; devices and 
file descriptions are peculiar to the job 
being run. 



//bJOBbEXAMPLE 
//bASSGNbSYS010,X'19 3' 
//bASSGNbSYS005,X' OOE' 

(assume standard labels) 
//bDLBLbUIN, ' EXAMPLEbFILE ' ,67/365 
//bEXTENTbE=3,SYS010, 001101, 1,0, 12100, 00 900 
//bEXTENTbB=3,SYS010,001101,l,l,16 00 0,00013 
//bEXECbDCPR 

//bUMPbTL,FF,A=(K = 20,D = 9 0),B=(12 0) ,0C,S2,PlnI 
//bHlbLISTbOFbDATAbCELLbFILE 
//bEND 
/g 



Note: If you want to process sequential 
files to support f orced-end-of-volume 
(FEOV) , bit 7 of the UPSI byte irust be set 
on (//bUPSIbOOOOOOOl). This bit 7 must be 
set off, if the file to be copied was built 
by using the direct access method (DAM) or 
indexed sequential access irethcd (ISAM). 
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Data Cell to Tape 



The data cell-to-tape prograrr transfers a 
file from one or more data cells to one or 
more tape reels. These files iray he 
copied, reblocked, field selected, or 
reblocked and field selected. If either 
the field select or refclock option is to be 
used, the input records must be fixed or 
variable-length. 



Utility Modifier Statement 



This statement contains information 
required for the operation of this program. 
If this statement is omitted from the 
program, the following parameters are 
assumed: 

//bUbTC,FU,A=(1000) ,B=(1000) ,0U,R1 ,E= (2321) 

The format and entries for the utility 
modifier statement for this program are: 

//bUMTbTt,Ff,A=( input) ,B= (output) ,Cx,Rx, 
E=(e) 

Figure 13 shows detailed information of 
the entries in the utility modifier 
statement for the data cell-to-tape 
program. 

E ntr y Reason 

//bU These entries identify this as a 
utility modifier statement. 

MTb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 

Field Select Statement 

This statement provides the information for 
the file-to-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. As many field-select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 
filled even if additional field select 
cards follow. The field selected must be 
complete in one statement. The format and 
contents of this statement are: 



r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 

When a field is to be selected from a 
key field (data cell input) , the letter K 
fcllcwed by a comma and the starting 
position of the field to be selected must 
be placed in parentheses. 

Example: //bFSb(K,r), s, t 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, (P,n,m):,t 

P 

identifies the pack operation, 
n 

is the size of the input field, 
m 

is the size of the output field. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 



//bFSbr,s,t/r, s,t/r,s, t 
Contents 



//bFSb 



Explanatio n 

//b identifies this as a 

control statement. 

FS identifies this as a field 
select control statement. 



r, (U,n,m) , t 
U 



n 



m 



identifies the unpack operation, 
is the size of the input field, 
is the size of the output field. 
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PARAMETER 



Function 
Tt 



rormar 
Ff 



Input 
Description 



Output 
Description 



POSSIBLE 
FORMS 



TC 
TF 
TR 
TRF 



ENTRIES 



T 
C 
F 
R 
RF 



FV 
FU 



A=(n,m) 



Rewind Output 



First Record 
Rx 



Device Type 
Description 



A=(K=I,D=I) 



A=(g) 



B=(n,m) 



=(g) 



OR 
ON 
OU 



Rx 



E=(e) 



EXPLANATION 



The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 



I tie leading h ot these three possible torms identities this as the tormat parameter. 
The second F of the first possible form must be indicated for fixed-length records. 
The letter V must be indicated for variable-length records. 
The letter U must be indicated for undefined records. 



A= 
(n,m) 

A= 
(K=I,D=I) 

A= 
(9) 



{n,m) 



(g) 



E= 
(e) 



This letter and symbol indicate this is the input description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and 
the letter m indicates the maximum block size. 

This letter and symbol Indicate this is the input-description parameter. 

For fixed-length data cell input records with keys, the letter K and symbol = must precede the 
length of the key field. The letter D and symbol = must precede the length of the data field. 
These two fields must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block 
length must be enclosed in parentheses. 



This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block 
length (the letter m) must be enclosed in parentheses and separated by a comma. For field select 
with variable length records the letter n indicates the size of the fixed portion of each record, 
and the letter m indicates the maximum block size. 

This letter and symbol indicate this is the output-description parameter. 

For undefined output records or varioble output records without field select, the moximum block 
length must be enclosed in parentheses. 



The first letter in these forms identifies this parameter. 

The rewind option for thp output tape is active both before and after data transfer . 

Rewind both before and after data transfer. 

Do not rewind either before or after data transfer. 

Rewind before and rewind and unload after data transfer. 



The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be 
bypassed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 



This letter and symbol indicate this is the device type description parameter. 

For input devices the valid entry is 2321 , This entry must be enclosed in parentheses. 



Figure 13. Data Cell-to-Tape Utility Modifier Statement 
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COPY VARIABLE 

When the secti 
record, not de 
is to be trans 
the letters CV 
present in the 
this entry is 
that have been 
error will be 
be entered: 



on of a variable-length 
fined as the fixed portion, 
f erred to the output record, 
(copy variable) irust be 
field select statement. If 
made when processing records 
defined as fixed length, an 
indicated. The CV entry can 



• Before the first field to be selected. 

• Between selected fields. 

• Following selected fields. 

Examples; 

//bFSbC V/r , s , t/r , s, t 
//bFSbr, s, t/CV/r, s,t 
//bFSbr , s, t/r, s, t/CV 



The variable section of the record is 
placed in the output record following the 
fixed portion of the record as described in 
the output description parameter. 

Control Statement Stream 

A sample control statement input stream for 
running a data cell-to-tape program from 



the disk resident relocatable library 
follows; device and file descriptions are 
peculiar to the job being run. 



//bJOBbEXAMPLE 

//bASSGNbSYSOlO, X' 193' 

//bASSGNbSYSOOS, X '18 2' 

//bASSGNbSYSLNK, X ' 1 9 ' 

//bASSGNbSYS001,X'180' 

//bUPSIbOlOOOOOO (user standard input and 

standard output labels) 
//bOPTIONbLINK 
bINCLUDEblJWMT 

bPHASEbDCTPS , IJWMTCS 2 , NOAUTO 
bINCLUDEbULABROUT (user label processing 

routine) 
bEiSiTRY 

Z/bLBLTYPbTAPE 
Z/bEXECbLNKEDT 
//bTLBLbUCUT, ' EXAMPLEbFILE' ,67/3 00,010203, 

0001,0001, 0001,01 
//bDLBLbUIN, 'DATAbCELLbTCbTAPE' ,67/365 
//bEXTENTbB=9, SYS 010, 000123, 1,0, 12 68 0,00 020 
//bEXEC 

//bUMTbTRF,FF,A=(K=10,D=100) ,B=(110,440) ,0N 
//bFSb(K,l) ,10,1/1,100,11 
//bEND 
/S 



Note; If you want to process sequential 
files to support forced-end-of-volume 
(FEOV) , bit 7 of the UPSI byte must be set 
en (//bUPSIbOOOOOOOl) . This bit 7 must be 
set off, if the file to be copied was built 
by using the direct access method (DAM) or 
indexed sequential access method (ISAM). 
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Disk to Card 



The disk-to-card program transfers the 
contents of a disk file to a card file. 
The output file ir.ay be punched in either 
EBCDIC or binary. Each logical output 
record must fit on one card (80 bytes for 
EBCDIC or 160 bytes for binary). Unless 
only a portion of the input record is 
transferred through the field select 
option, the input record size will be 
restricted to 80 or 160. Input records to 
this program must be fixed length. Files 
in this program miay be copied, reblocked, 
field selected, or reblocked and field 
selected. Blocked input records must be 
reblocked. 



5lltr;y R ea son 



//bU These entries identify this as the 
utility modifier statemient. 



ECb The initials of the program:. These 
initials can be omitted if the 
statement is used for m.ore than one 
program. 



Field Select Statement 



Sequence Numbering 



Sequence numbering of the output tc this 
program may be requested. A field up to 
ten characters in length will be punched 
into each card. This field will be 
numbered starting from one (with high-order 
zeros) , and will be increased by one f cr 
each succeeding card. In the event that a 
sufficiently long field is net defined tc 
number all of the cards, the numbers will 
wrap around to zero with nc error 
indication. This option is independent of 
field select. The sequence number will 
overlay any data selected into the sequence 
area of the card. 



This statement provides the 
the file-tc-file program to 
from an input record to the 
different relative location 
record. As many field selec 
necessary may be used. If t 
punched in cards, each card 
filled even if additional fi 
cards follow. The field sel 
complete in one statement, 
contents of this statement a 

//bFSbr, s , t/r, s, t/r, s, t 

Contents Explanation 



information for 
transfer fields 
same or a 
of the output 
t statements as 
he statement is 
need not be 
eld select 
ected must be 
The format and 
re: 



//bFSb 



//b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 



r , s, t/ 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program, 
If this statement is omitted from the 
program, the following parameters are 
assumed: 

//bUbTC,FF,A=(80,80) ,B=(80,80) ,0l,Fl,S2, 
E=(2311) 

The format and entries for the utility 
modifier statement for this program are: 

//bUDCbTt,Ff ,A=(input) ,B=(cutput) ,Cx,Rx, 
Sx,Q=(x,y),E=(e) 



Figure 14 shows detailed information of 
the entries in the utility modifier 
statement for the disk-to-card program. 



r indicates the starting 
position, relative to one (not 
zero) , of the field in the 
input record to be selected. 
For binary records, this 
number is relative to the 
record as it appears in main 
storage, not on the card. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 
C 
F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 


F 
F 


The leading F of this form identifies this as the format parameter. 
The second F of the form must be indicated for fixed-length records. 


Input 
Description 


A=(n,m) 
A=(K=I,D=<) 


A= 
(n,m) 

A= 
(K=I,D=I) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 

This letter and symbol indicate this is the input-description parameter. 

For fixed-length disk input records with keys, the letter K and symbol = must precede the length of 
the key field. The letter D and symbol = must precede the length of the data field. These two 
fields must be separated by a comma and enclosed in a parentheses. 


Output 
Description 


B=(n,m) 


B= 
(n,m) 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 


Output Mode 
Ox 


01 
02 




1 
2 


The first letter in these forms identifies this parameter. 
EBCDIC Punching 
Binary Punching 


Sequence- 
Numbering 
Q={x,y) 


Q=(x,y) 


Q= 

X 

y 


This letter and symbol identify this parameter. 

This represents the first position of a field in a card (relative to one) for sequence-numbering (1 or 2 
digits). 

Separator 

This represents the length of the field (maximum 10). The (x,y) portion of this parameter must be 
enclosed in parentheses. 


First Record 
Rx 


Rx 


R 

X 


The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be by- 
passed). If the file is to be copied, the function parameter must be indicated to be reblocked and 
the input and output file description parameters must contain identical values. 


Stacker 

Select 

Sx 


SI 
S2 
S3 


S 

1 

2 

3 


The first letter in these forms identifies this parameter. 

Select Pocket 1 

Select Pocket 2 

First Character Stacker Select 


Device Type 
Description 


E=(e) 


E= 


This lettpr and sy mbol indicate this is the device type description parameter. 

For input devices the valid entries ore 2311 and 2314. If a 2319 is used, 2314 must be specified. 
This entry must be enclosed in parentheses. 



Figure 14. Disk-to-Card Utility Modifier Statement 



Disk to Card 5b 



When a field is to be selected from a 
key field (disk input) , the letter K 
followed by a comma and the starting 
position of the field to be selected must 
be placed in parentheses. 

Ex amp le; //bFSb (K,r) ,s,t 



identifies the unpack operation. 



is the size of the input field. 



is the size of the output field. 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, (P,n,m) , t 

P 

identifies the pack operation. 



is the size of the input field. 



is the size of the output field. 



Control Statement Stream 

A sample control statement input stream for 
running a disk-to-card program from the 
cere image library follows; device and file 
descriptions are peculiar to the ">ob bein" 
run. 

//bJOBbEXAMPLE 
//bASSGNbSYS006,X' OOD' 
//bASSGNbSYS009,X'191' (standard labels 

assumed) 
//fcDLBLbUIN,'DISKbFILE' ,67/365 
//bEXTENTbSYS0 09, 112233, 1,0, 014 0, 00043 
//bEXECbDKCD 
//bEND 
/6 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U,n, m) , t 



Note; If you want to process sequential 
files to support forced-end-cf-volume 
(FEOV), bit 7 of the UPSI byte must be set 
on (//bUPSIbOOOOOOOl). This bit 7 must be 
set off, if the file to be copied was built 
by using the direct access method (DAM) or 
indexed sequential access method (ISAM). 
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Disk to Data Cell 



The disk-to-data cell prograrr transfers a 
file between any number of assigned data 
cells and disks. Files can be copied, 
reblocked, field selected, or reblocked and 
field selected. If the field select or 
reblock options are to be used, the input 
records must be fixed length or variable 
length. 

This program may also be used to 
condense a sequential disk file earlier 
created with a forced end-of- volume record. 
A FEOV record will therefore net appear on 
the output file. For a full description of 
forced end of volume, see the DOS 
Supervisor and I/O Macr os publication. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program, 
If this statement is omitted from the 
program, the following parameters are 
assumed: 

//bUbTC,FU,A=(1000),B=(1000),OY,Rl, 
£=(2311,2321) 

The format and entries for the utility 
modifier statement for this program are: 

//bUDMbTt,Ff,A=( input) ,B={output) ,Cx,Rx, 
E=(c,d) 



Figure 15 shows detailed information of 
the entries in the utility modifier 
statement for the disk-to-data cell 
program. 

//bU These entries identify this as a 
utility modifier statement. 

DMb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



Field Select Statement 

This statement provides the information for 
the file-to-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. As many field select statements as 
necessary may be used. If cards are 



punched, each card need not be filled even 
if additional field select statements 
fcllcw. The field selected must be 
complete in one statement. The format and 
contents of this statement are: 

//bFSbr, s, t/r, s, t/r, s, t 

Contents Explanation 

//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record - 

/ (slash) separates selected 
fields. 

When a field is to be selected from a 
key field (disk input) , the letter K 
fcllcwed by a comma and the starting 
position of the field to be selected must 
be placed in parentheses. 



Example: //bFSb (K,r) , s, t 

When a field is to be selected from a 
key field (disk input) and is to be placed 
into a key field (data cell output), the 
starting position of the field in the input 
record and output record must be preceded 
by the letter K and a comma and enclosed in 
parentheses. 

Exam£le: //bFSb(K,r) , s, (K, t ) 

When a field is to be placed into a key 
field (data cell output) , the letter K 
followed by a comma and the starting 
position of the field in the output record 
must be placed in parentheses. 

Example: //bFSbr, s, (K,t) 
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PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r , (P, n, m) , t 

P 

identifies the pack operation. 



is the size of the input field. 



is the size of the output field. 



• Before the first field to be selected. 

• Between selected fields. 

• Following selected fields. 

E xamples : 

//bFSbCV/r , s, t/r , s , t 
//bFSbr , s , t/CV/r , s , t 
//bFSbr , s , t/r , s , t/CV 

The variable section of the record is 
placed in the output record following the 
fixed portion of the record as described in 
the output description parameter. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U, n,m) , t 

U 

identifies the unpack operation; 



is the size of the input field; 



is the size of the output field, 



COPY VARIABLE 

When the section of a var 
record, not defined as th 
is to be transferred to t 
the letters CV (copy vari 
present in the field sele 
this entry is made when p 
that have been defined as 
error will be indicated, 
be entered: 



iable-length 
e fixed portion, 
he output record, 
able) trust be 
ct statement. If 
recessing records 
fixed length, an 
The CV entry can 



Control Statement Stream 

A sample control statement input stream for 
running the disk-to-data cell prcgrair from 
the core image library follows; device and 
file descriptions are peculiar to the job 
being run. 

//bJOBbEXAMPLE 

//bPAUSEhMOUNTbPACKb3523 36bONbl9 0bANDbCELLb 

3624 31bONbBINb4bOFbl9 3 
//bASSGNbSYS004, X ' 19 ' 
//bASSGNbSYS005,X'193' (standard labels 

assumed) 
//bOLBLbUIN, ' DISKbFILE' , 67/365 
//bEXTENTbSYS004, 352336, 1 , 0, 00551 , 00082 
//bDLBLbUOUT, ' BACK-UPbFILE' , 67/300 
//bEXTENTbE=4,SYS005,3 62tl37,l,0,C1465,00 032 
//bEXECbDKDC 

//bUDMbTC,FU,A=(960) ,B=(960) ,0Y 
//bEND 
/£ 

Note: If you want to process sequential 
files to support forced-end-cf-volume 
(FEOV), bit 7 of the UPSI byte must be set 
en (//bUPSIbOOOOOOOl) . This bit 7 must be 
set off, if the file to be copied was built 
by using the direct access method (DAM) or 
indexed seauential access method (tsami. 



58 DOS and TOS Utility Programs 



PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


FuncHon 
Tt 


TC 
TF 

TR 
TRF 


T 
C 
F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 
The second F of the first possible form must be indicated for fixed-length records. 
The letter V must be indicated for variable-length records. 
The letter U must be indicated for undefined records. 


Input 
Description 


A=(n,m) 

A=(g) 
A=(K=I,D=I) 


A= 
(n,m) 

A= 

(9) 

A= 
(K=l,D=l) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the size of the fixed portion of each record, and the letter m indicates the 
maximum block size . 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block length 
must be enclosed in parentheses. 

This letter and symbol indicate this is the input-description parameter. 

For fixed-length disk input records with keys, the letter K and symbol = must precede the length of 
the key field. The letter D and symbol = must precede the length of the data field. These two fields 
must be separated by a comma and enclosed in parentheses. 


Output 
Description 


B=<n,m) 

B=(K=I,D=I) 
B=(g) 


B= 

(n,m) 

B= 

(K = I,D=I) 

B= 
(9) 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and the 
letter m indicates the maximum block size . 

This letter and symbol indicate this is the output-description parameter. 

For fixed-length data cell output records with keys, the letter K and symbol = must precede the length 
of the key field. The letter D and symbol = must precede the length of the data field. These two 
fields must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the output-description parameter. 

For undefined output records or variable output records without field select, the maximum block length 
must be enclosed in parentheses. 


Data Cell 
Check Ox 


OY 
ON 


O 
Y 
N 


The first letter in these forms identifies this parameter. 

Write-data cell check (forced for this program). 

Do not write-data cell check (ignored for this program). 


First Record 
Rx 


Rx 


R 

X 


The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be by- 
passed). If the file is to be copied, the function parameter must be indicated to be reblocked and 
the input and output file description parameters must contain identical values. 


Dsvice Type 
Description 


E=(c,d) 


E= 
(c,d) 


TTiis letter and symbol indicate this is the device type description parameter. 

For input devices (the letter c) the valid entries are 2311 and 2314. If a 2319 is used, 2314 must be 
specified. For output devices (the letter d) the valid entry is 2321. These entries must be enclosed in 
parentheses and separated by a comma. 



Figure lb. Disk-to- Data Cell Utility Modifier Statement 
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Disk to Disk 



The disk-to-disk program transfers a file 
between disk units or between areas of the 
sarre unit. Using the same device for input 
and output can cause a reduction in 
performance. Files can be copied, 
reblocked, field selected, or reblocked and 
field selected. If the field select or 
reblock options are to be used, the input 
records must be fixed or variable length. 

This program may also be used tc 
condense a sequential disk file earlier 
created with a forced end-of -volume record. 
A FEOV record will therefore not appear on 
the output file. For a full description of 
forced end of volume, see the DOS 
Supervisor and I/O. Macros publ icat ion . 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program.. 
If this statement is oiritted from the 
program, the following parameters are 
assumed: 

//bUbTC, FU,A=( 1000), B=( 1000), 0Y,R1, 
£=(2311,2311) 

The format and entries for the utility 
modifier statement for this program are: 

//bUDDbTt,Ff,A= (input) ,B=(cutput) ,Cx,Rx, 
E=(c,d) 

Figure 16 shows detailed information of 
the entries in the utility modifier 
statement for the disk-to-disk program. 



Entry 
//bU 



DDb 



Reason 

These entries identify this as a 

utility modifier statement. 

The initials of the program. These 
initials can be omitted if the 
statement is to be used for more 
than one program. 



Field Select Statement 

This statement provides the information for 
the file-to-file program tc transfer fields 
from an input record to the same or a 
different relative location of the output 
record. As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 



filled even if additional field select 
cards follow. The field selected must be 
complete in one statement. The format and 
contents of this statement are: 

//bFSbr, s,t/r,s,t/r,s, t 

Q2Si§Si§ Ex plan ation 
//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 

When a field is to be selected from a 
key field (disk input) , the letter K 
followed by a comma and the starting 
position of the field to be selected must 
be placed in parentheses. 



Example: //bFSb(K,r),s, t 

When a field is to be selected from a 
key field (disk input) and is to be placed 
into a key field (disk output) , the 
starting position of the field in the input 
record and output record must be preceded 
by the letter K and a comma and enclosed in 
parentheses. 

Examele: //bFSb (K,r) , s, (K, t) 

When a field is to be placed into a key 
field (disk output), the letter K followed 
by a comma and the starting position of the 
field in the output record must be placed 
in parentheses. 

Example: //bFSbr, s, (K,t) 



60 DOS and TOS Utility Programs 



PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 

Tf 


TC 
TF 
TR 
TRF 


T 
C 
F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 
The second F of the first possible form must be indicated for fixed-length records. 
The letter V must be indicated for variable-length records. 
The letter U must be indicated for undefined records. 


Input 
Description 


A=(n,m) 

A=(g) 
A=(K=I,D=I) 


A= 
(n,m) 

! 

A= 

(g) 

A= 
(K=I,D=I) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input record length (the letter n) and the input block length (the letter m) must be 
enclosed in parentheses and separated by a comma. For field select with variable length records 
the letter n indicates the size of the fixed portion of each record, and the letter m indicates the 
maximum block size. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block 
length must be enclosed in parentheses. 

This letter and symbol indicate this is the input-description parameter. 

For fixed-length disk input records with keys, the letter K and symbol = must precede the length 
of the key field. The letter D and symbol = must precede the length of the data field. These 
two fields must be separated by a comma and enclosed in parentheses. 


Output 
Description 


B=(n,m) 

B=(K=I,D=I) 
B=(g) 


B= 

(n,m) 

B= 
(K=I,D=I) 

B= 

(g) 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and the 
letter m indicates the maximum block size. 

This letter and symbol indicate this is the output-description parameter. 

For fixed-length disk output records with keys, the letter K and symbol = must precede the length 
of the key field. The letter D and symbol = must precede the length of the data field. These two 
fields must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the output-description parameter. 

For undefined output records or variable output records without field select, the maximum block 
length must be enclosed in parentheses. 


Disk Check 
Ox 


OY 
ON 


O 
Y 
N 


The first letter in these forms identifies this parameter. 

Write-disk check. 

Do not write-disk check. 


First Record 
Rx 


Rx 


R 

X 


The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be bypassed). 
If the file is to be copied, the function parameter must be indicated to be reblocked and the input 
and output file description parameters must contain identical values. 


Device Type 
Description 


E=(c,d) 
E=(e) 


E= 
(c,d) 

E= 

(e) 


This letter and symbol indicate this is the device type description parameter. 

For input devices (the letter c) and output devices (the letter d) the valid entries are 2311 and 2314. 

If a 2319 is used, 2314 must be specified. These entries must be enclosed in parentheses 

and separated by a comma. 

This letter and symbol indicate this is the device type description parameter. 

For input and output devices the valid entries are 231 1 or 2314. This entry must be enclosed in 
parentheses. 



Figure 15. Disk-to-Disk Utility Modifier Statement 
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PACK 

When the input field is to be packed before 
it is placed in the output recqrd, the 
field select parameter will appear in this 
form: 

r, (P,n, m) , t 

P 

identifies the pack operation. 



is the size of the input field; 



is the size of the output field, 



• Before the first field to he selected. 

• Between selected fields. 

• Following selected fields. 

Examples : 

//bFSbCV/r , s , t/r , s , t 
//bFSbr , s , t/C V/r , s , t 
//bFSbr , s , t/r , s , t/CV 

The variable section of the record is 
placed in the output record following the 
fixed portion of the record as described in 
the output description parameter. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U,n, m) , t 

U 

identifies the unpack operation. 



is the size of the input field. 



is the size of the output field. 



COPY VARIABLE 

When the section of a variable-length 
record, not defined as the fixed portion, 
is to be transferred to the output record, 
the letters CV (copy variable) must be 
present in the field select statement. If 
this entry is made when processing records 
that have been defined as fixed length, an 
error will be indicated. The CV entry can 
be entered: 



Control Statement Stream 

A sample control statement input stream for 
running a disk-to-disk program from the 
core image library follows; device and file 
descriptions are peculiar to the job being 
run. 

//bJOBbEXAMPLE 

//bPAUSEbMCUNTbPACKbONbDRIVEfcl91 
//bASSGNbSYSOOU, X ' 191 ' 
//fcASSGNbSYS005,X'191' (standard labels 

assumed) 
//bDLBLbUIN,'DISKbINPUT' ,67/365 
//bEXTENTbSYS004, 222 33 3, 1,0, 00 913,00020 
//bDLBLbUCUT, ' DISKbOUTPUT ' ,67/300 
//bEXTENTfcSYS005,222 3 3 3,l,0,00413,00 02 
//bEXECbDKDK 

//tUDDbTR,FF,A=(80,8 0) ,B=(80,960),OY 
//bEND 
/£ 

Note; If you want to process sequential 
files to support f orced-end-of-volume 
(FEOV) , tit 7 of the UPSI byte must be set 
en (//bUPSIbOOOOOOOl) . This bit 7 must be 
set off, if the file to be copied was built 
by using the direct access method (DAM) or 
indexed sequential access method (ISAM) . 
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Disk to Printer 



The disk-to-printer program can display a 
disk file in either data display or data 
list format. Data display provides a 
visual picture of the data where every byte 
appears in the printed output; this format 
can handle fixed, variable, and undefined 
records. Data list provides a simple 
edited list of the file; input records must 
be fixed or variable length and (fcr the 
data list function only) must not exceed 
the size of the print line. An option is 
available to this program to specify the 
number of logical records in a file to be 
bypassed before printing begins. 

Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
If this statement is omitted from the pro- 
gram, the following parameters are assumed: 

//bUbTD,FU,A=(1000), B=(120) ,0X, Si, PY, Rl, 
E=(2311) 

The format and entries for the utility 
modifier statement for this program are: 

//bUDPbTt,Ff ,A=(input) ,B= (output) ,Ox,Sx, 
Px,Rx,E=(e) 

Figure 17 shows detailed information of 
the entries in the utility modifier 
statement for the disk-to-printer program. 

En try Reason 

//bU These entries identify this as a 
utility modifier statement. 

DPb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



Field Select Statement 

This statement provides the information for 
the file-to-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. This is valid only for data list 
mode. As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 
filled even if additional field select 
cards follow. The field selected must be 
complete in one statement. The format and 
contents of this statement are: 

//bFSbr , s , t/r , s , t/r , s , t 



Contents Explanation 
//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes . 

, separator. 

t indicates the starting 
position, relative to one, of 
the print line. 

/ (slash) separates selected 
fields. 



UNPACK 

Vjhen the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U,n,m) ,t 
U 

identifies the unpack operation. 
n 

is the size of the input field, 
m 

is the size of the output field. 



HEXADECIMAL 

When a program has printed output, the 
field selected may be printed in 
hexadecimal representation. This operation 
is indicated as follows: 

r, (X,n),t 

X 

identifies the hexadecim^al operation; 

n 

is the size of the input field. Only 
the field length of the input is 
necessary for this operation because 
the output length will always be 
assumed to be twice as large. X and n 
are enclosed in parentheses and 
separated by a comma. 
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-PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TD 
TL 
TLF 


T 
D 
L 
LF 


The Initial T identifies this os the type of function parameter. 

Display 

List 

List and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 

F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 

The second F must be indicated for fixed-length records. 

The letter V must be indicated for variable-length records. 

The letter U must be indicated for undefined records. 

With undefined records, the only valid entrv above is data display. 


Input 
Description 


A=(n,m) 

A=(K=I,D=I) 

A=vg) 


A= 
(n,m) 

A= 
{K-1,D=1) 

A= 

(g) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and 
the letter m indicates the maximum block size. 

This letter and symbol indicate this is the input-description parameter. 

For fixed-length disk input records with keys, the letter K and symbol = must precede the length 
of the key field. The letter D and symbol = must precede the length of the data field. 
These two fields must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, length must be enclosed 
in parentheses. 


Output 
Description 


B={p) 
B=(n,p| 


B- 

B- 

(n,p) 


This letter and symbol Indicate this is the output-description parameter. 

For printer output, the size of the print line (120, 132, or 144) must be entered. 
A print line size of 120 is forced if TD is specified. 

This letter and symbol indicate this is the output-description parameter. 

For field select of variable length records with printer output records, the fixed portion of each 
output record (the letter n) and the size of the print line (the letter p) must be enclosed in 
parentheses and separated by a comma. 


Printer 
Output 
Ox 


OX 

oc 


o 

X 

c 


The first letter in these forms identifies this parameter. The type of output indicated by the 
field-select parameter (hexadecimal or character) overrides this parameter. 

Hexadecimal Printout (for data display only) 

Alphameric Printout (forced for data list mode) 


Page- 

Numbering 

Px 


PY 
PN 


P 

Y 

N 


The first letter in these forms identifies this parameter. 

Number pages (forced for data display) 

Do not number pages (forced for first character forms control) 


First Record 
Rx 


Rx 


R 

X 


The first letter in these forms identifies this parameter. 

This represents the position of the firsr logical record to be printed; x - 1 records will be bypassed. 



Figure 17. Disk-to-Printer Utility Modifier Statement (Part 1 of 2) 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Spacing 
Sx 


SI 
S2 
S3 
SA 
SB 
SC 
SD 


S 

1 

2 

3 

A 

B 

C 

D 


The first letter in these forms identifies this parameter. 

Single Spacing (forced for data display) 

Double Spacing 

Triple Spacing 

Type A First Character Forms Control 

Type B First Character Forms Control 

Type C First Character Forms Control 

Type D First Character Forms Control 


Device Type 
Description 


E=(e) 


E= 
(e) 


This letter and symbol indicate this is the device type description parameter. 

For input devices the valid entries ore 2311 and 2314. If a 2319 is used, 2314 must be specified. 
This entry must be enclosed in parentheses. 



Figure 17. Disk-to-Printer Utility Modifier Stateirent (Part 2 of 2) 



COPY VARI?^BLE 

When the section of a variable-length 
record, not defined as the fixed portion, 
is to be transferred to the cutput record, 
the letters CV (copy variable) must be 
present in the field select stateirent. If 
this entry is made when processing records 
that have been defined as fixed length, an 
error will be indicated. The CV entry can 
be entered: 

• Before the first field to be selected. 

• Between selected fields. 

• Following selected fields. 

Examples: 

//bFSbCV/r , s, t/r, s, t 
//bFSbr , s, t/CV/r , s, t 
//bFSbr, s, t/r, s, t/CV 

The variable section of the record is 
placed in the output record follcvving the 
fixed portion of the record as described in 
the output description paraireter. 



INDEXED SEQUENTIAL HANDLING 

An indexed sequential file can be printed 
by specifying sequential in the DLBL card 
and specifying undefined forrrat in the 
utility modifier statement. The track 
indexes will be printed along with the 
prime data area. Further indexes will not 
be obtained. 



Control Statement Stream 

A sample control statement input stream for 
running a disk-to-printer prograrr from the 



core image library follows; device and file 
descriptions are peculiar to the job being 
run. See page 27 for a description of the 
heading statement. 



//bJOBbEXAWPLE 

//bASSGNbSYS007,X' 191' 

//bASSGNbSYS005,X' OOE' 

//bDLBLbUIN, 'DISKbFILE', 67/365 

//fcEXTENTbSYS007,333 333,l,0, 01224, 00022 

Z/bEXECbDKPR 

//fcUDPfcTL ,FF,A=(80,400),E=(132),S1 

//bEND 

/g 



To print an indexed sequential file 
(refer to "Indexed Sequential Handling" 
above) follow this sample control statement 
input stream. Device and file descriptions 
are peculiar to the job being run. 



//bJOBbEXAMPLE 

//bASSGNbSYS007,X' 191" 

//bASSGNbSYS005,X' OOE' 

//bDLBLbUIN, 'INDEXED SEQUENTIAL' , 69/152, SD 

//fcEXTENTbSYS007, 333 333,1,0, 01224, 00022 

//bEXECbDKPR 

//bUDPbTD,FU,A=(80) ,E=(132) ,0X 

//bEND 

/& 



Note: If you want to process sequential 
files to support f orced-end-cf-vclume 
(FEOV) , tit 7 of the UPSI byte must be set 
en (//bUPSIbOOOOOOOl) . This bit 7 must be 
set off, if the file to be copied was built 
by using the direct access method (DAM) or 
indexed sequential access method (ISAM) . 
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Disk to Tape 



The disk-to-tape program transfers a file 
from one or more disk units to one or more 
tape reels. These files may be copied, 
reblocked, field selected, or reblocked and 
field selected. If the field select or 
reblcck options are used, the input records 
must be fixed or variable length. 

This program; may also be used tc 
condense a sequential disk file earlier 
created with a forced end-of -volume record. 
h FEOV record will therefore not appear on 
the output file. For a full description of 
forced end of volume, see the DOS 
Supervisor and I/O Macros publication. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
If this statement is omitted from the 
program, the following parameters are 
assumied: 

//bUbTC,FU,A=(1000) ,B=(1000) ,0U ,R1 ,E= ( 2311) 

This format and entries for the utility 
modifier statement for this program are: 

//bUDTbTt,Ff ,A=(input) ,B=(output) ,Ox,Rx, 
E=(e) 

Figure 18 shows detailed information of 
the entries in the utility modifier 
statement for the disk-to-tape program. 

l2tr^ 5§§son 

//bU These entries identify this as a 
utility modifier statement. 

DTh The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



Field Select Statement 



This statement 
the file-to-fi 
from an input 
different rela 
record. To tr 
field select i 
select stateme 
If the stateme 
card need not 



provides the 
le program to 
record to the 
tive location 
ansfer the key 
s required. A 
nts as necessa 
nt is punched 
be filled even 



information for 
transfer fields 
same or a 
of the output 

field to tape, 
s many field 
ry may be used, 
in cards, each 

if additional 



field select cards follow. The field 
selected must be complete on one statement. 
The format and contents of this statement 
are: 

//bFSbr , s , t/r , s , t/r , s , t 

22Iii2Ilis Explanation 
//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 

When a field is to be selected from a 
key field (disk input) , the letter K 
followed by a comma and the starting 
position of the field to be selected must 
be placed in parentheses. 

Example: //bFSb(K,r) , s, t 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form : 

r , (P,n,m) , t 

P 

identifies the pack operation, 
n 

is the size of the input field, 
m 

is the size of the output field. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 

.-..-C^,-.-- - 

F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy, .. 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms Identifies this as the format parameter. 
The second F of the first possible form must be indicated for fixed-length records. 
The letter V must be Indicated for varioble-length records. 
The letter U must be Indicated for undefined records. 


Input 
Description 


A=(n,m) 

A=(K=I,D=I) 
A=(9) 


A= 
(n,m) 

A= 
(K=I,D=I) 

A= 
(9) 


This letter and symbol Indicate this Is the input-description parameter. 

For fixed-length input records, the Input record length (the letter n) and the Input block length 
(the letter m) must be enclosed In parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and 
the letter m Indicates the maximum block size. 

This letter and symbol indicate this Is the Input-description parameter. 

For fixed-length disk Input records with keys, the letter K and symbol = must precede the length of 
the key field. The letter D and symbol = must precede the length of the data field. These two 
fields must be separated by a comma and enclosed In parentheses. 

This letter and symbol Indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block 
length must be enclosed in parentheses. 


Output 
Description 


B=(n,m) 
B=(g) 


B= 
(n,m) 

B= 

(g) 


This letter and symbol Indicate this Is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block 
length (the letter m) must be enclosed in parentheses and separated by a comma. For field select 
with variable length records the letter n indicates the size of the fixed portion of each record, and 
the letter m indicates the maximum block size. 

This letter and symbol indicate this Is the output-description parameter. 

For undefined output records or variable output records without field select, the maximum block 
length must be enclosed In parentheses. 


Rewind Output 
Ox 


OR 
ON 
OU 


o 

R 
N 
U 


The first letter in these forms identifies this parameter. 

The rewind option for the output tape is active both before and after data transfer . 

Rewind both before and after data transfer. 

Do not rewind either before or after data transfer. 

Rewind before and rewind and unload after data transfer. 


First Record 
Rx 


Rx 


R 

X 


The first letter in this form identifies this parameter. 

This represents the position of the first logical Input record to be output (x-1 records will be 
bypassed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the Input and output file description parameters must contain identical values. 


Device Type 
Description 


E=(e) 


E= 

(e) 


Tliis letter and symbol indicate tfiis is the device type description parameter. 

For input devices the valid entries are 2311 and 2314. If a 2319 is used, 2314 must be specified. 
This entry must be enclosed in parentheses. 



Figure 1! 



Disk-to-Tape Utility Modifier Stateirent 



Disk to Tape 6'/ 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 



The variable section cf the record is 
placed in the output record following the 
fixed portion of the record as described in 
the output description parameter. 



r, (U, n,m) , t 

U 



identifies the unpack operation. 



is the size of the input field. 



is the size of the outDUt field. 



COPY VARIi^BLE 

When the section of a variable-length 
record, not defined as the fixed portion, 
is to be transferred to the output record, 
the letters CV (copy variable) must be 
present in the field-select control 
statement. If this entry is made when 
processing records that have been defined 
as fixed length, an error will be 
indicated. The CV entry can be entered: 

• Before the first field tc be selected. 

• Betiveen selected fields. 

• Following selected fields. 

Examples: 

//bFSbCV/r , s , t/r , s, t 
//bFSbr,s, t/CV/r, s, t 
//bFSbr , s , t/r , s , t/C V 



Control Statement Stream 

A sarrple control stateirent input strearr for 
running a disk-to-tape program froir the 
core irrage library follows; devices and 
file descriptions are peculiar to the job 
being run. 



//bJOBbEXAMPLE 

//bASSGNbSYS00U,X'191' 

//bASSGNbSYS00 5,X'18 3' 

//bUPSIbOOlOOOOO (tapemark at beginning of 

unlabeled output file) 
//bDLBLbUIN,'DISKbFILE' ,67/365 
//bEXTENTbSYS004, 333333,1,0, 01224,00022 
//bEXECbDKTP 

//bUDTbTR,FF,A=(80,8 00) ,E= (80 , 80) ,0R 
//bEND 
/& 



Note: If you want to process sequential 
files to support forced-end-cf-volume 
(FEOV) , bit'? of the UPSI byte must be set 
on (//bUPSIbOOOOOOOl) . This bit 7 must be 
set off, if the file to be copied was built 
by using the direct access method (DAM) or 
indexed sequential access method (ISAM). 
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Tape to Card 



The tape-to-card program transfers the 
contents of a tape file to a card file. 
The output file may be punched in either 
EBCDIC or binary. Each logical output 
record must fit in one card (80 bytes for 
EBCDIC or 160 bytes for binary). Unless 
only a portion of the input record is 
transferred through the field select or 
reblock and field select option, the input 
record size will be restricted to 80 or 
160. Input records to this program must be 
fixed length. These files may be copied, 
reblocked, field selected,, or reblocked and 
field selected. Blocked input records must 
be reblocked. 



Field Select Statement 

This statement provides the information for 
the file-tc-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. As many field select statements as 
necessary iray be used. If the statement is 
punched in cards, each card need not be 
filled even if additional field select 
cards follow. The field selected must be 
complete on one statement. The format and 
contents of this statement are: 

//bFSbr, s,t/r,s, t/r, s, t 



Sequence Numbering 

Sequence numbering of the output tc this 
program may be requested. A field up to 
ten characters in length is punched into 
each card. This field is numbered starting 
from one (with high-order zeros) and is 
increased by one for each succeeding card. 
In the event that a sufficiently Icng field 
is not defined to number all of the cards, 
the numbers will wrap around to zero with 
no error indication. The sequence number 
will overlay any data selected into the 
sequence area of the card. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program, 
If this statement is omitted from the 
program, the following parameters are 
assumed: 

//bUbTC,FF,A=(80,80) ,B=(80,80) ,IU,Cl,Rl,S2 

The format and entries for the utility 
modifier statement for this program are: 

//bUTCbTt,Ff,A= (input) ,B=( output) ,Ix,Ox, 
Rx,Sx,Q=(x,y) 



Contents 
//bFSb 



r,s,t/ 



Explanation 

//b identifies this as a 

control statement. 

FS identifies this as a field 
select control statement. 

r indicates the starting 
position, relative to one (not 
zero),, of the field in the 
input record to be selected. 
For binary records this number 
is relative to the record as 
it appears in main storage, 
not on the card. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 



PACK 



Figure 19 shows detailed information of 
the entries in the utility modifier 
statement for the tape-to- card program. 

Entry Reason 

//bU These entries identify this as a 
utility modifier statement. 

TCb The initials of the program. These 

initials can be omitted if the 

statement is used for more than one 
program. 



When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, (P,n,m) ,t 

P 

identifies the pack operation, 
n 

is the size of the input field. 
m 

is the size of the output field. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 
C 
F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 


F 
F 


The leading F of this form identifies this as the format parameter. 
The second F of the form must be indicated for fixed- length records. 


input 
Description 


A=(n,m) 


A= 
(n,m) 


This letter and symbol indicate this is the input-description parameter. 

For fixed- length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 


Output 
Description 


B={n,m) 


B= 
(n,m) 


This letter and symbol indicate this is the output-description parameter. 

For fixed- length output records, the output record length (the letter n) and the output block 
length (the letter m) must be enclosed in parentheses and separated by a comma. 


Rewind Input 
Ix 


IR 
IN 
lU 


1 

R 
N 
U 


The first letter in these forrre identifies this parameter. 
Rewind both before and after data transfer. 
Do not rewind either before or after data transfer. 
Rewind before and rewind and unload after data transfer. 


Sequence- 
Numbering 
Q=(x,y) 


Q={x,y) 


Q= 

x 

/ 

y 


This letter and symbol identify this parameter. 

This represents the first position of a field in a cord (relative to one) for sequence- numbering 
(1 or 2 digits). 

Separator 

This represents the length of the field (maximum 10). The (x,y) parts of this parameter must be 
enclosed in parentheses. Absence of this parameter indicates no sequence numbers. 


First Record 
Rx 


Rx 


R 

X 


The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-l records will be 
bypassed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 


Stacker 
Gintrol 
Sx 


SI 
S2 
S3 


S 
1 
2 
3 


The first letter in these forms identifies this parameter. 

Select Pocket 1 

Select Pocket 2 

First Character Stacker Control 


Output 

Mode 

Ox 


Ol 
02 




1 
2 


The first letter in these forms identifies this parameter. 
EBCDIC Punching 
Binary Punching 



Figure 19. Tape-to-Card Utility Modifier Statement 
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UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 



//bASSGNbSYS002,X' 182' 

//bOPTIONbLINK 

bINCLUDEblJWTC 

tPHASEtTPCDS , I JWTCCS2 , NOAUTO 

bINCLUDE 



r,, (U,n,m) , t 



identifies the unpack operation. 



is the size of the input field. 



is the size of the output field, 



Control Statement Stream 

A sairple control statement input stream for 
running a tape-to-card program from the 
tape resident relocatable library follows; 
devices and file descriptions are peculiar 
to the job being run. 

//bJOBbEXAMPLE 

//bASSGNbSYSLNK,X'180' 

//bASSGNbSYS001,X'181' 



(user label processing routine on SYSIPT) 



bENTRY 

/* 

//bLBLTYPbTAPE (01) (01) indicates one 

VGL-TPLAB set 
Z/bEXECbLNKEDT 
//bASSGNbS YS 4 , X ' 1 8 3 ' 
//bASSGNbSYS006,X'00D'' 
//bUPSIbO 1000000 (standard and user 

standard labels) 
//bTLBLbUIN, 'DATAbFILEbeaS' , 67/365,000121, 

0001, 0001,0001,01 
//bEXEC 
//bUTCbTRF,FF,A= (70,700) ,B=(80,80) ,IN,S1, 

Ol,R380 
//bFSbl,70,l/l,10,71 
//bEND 
/& 
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Tape to Data Cell 



The tape-to-data cell prograir transfers a 
file from one or more tape reels tc any 
nurrber of assigned data cells. These files 
may he copied ^ field selected,- reblocked, 
or reblocked and field selected. If the 
field select or reblock options are used, 
the input records must be fixed or variable 
length. 



Contents 

//bFSb 



Explanation 

//b identifies this as a 

control statement. 



FS identifies this as a field 
select control statement. 



r, s, t/ 



Utility Modifier Statement 

This card contains information required for 
the operation of this prograir. If this 
card is omitted from the program, the 
following parameters are assumed: 



r indicates the starting 
pv^-j JL ^-lon , rsj-ui^ivs »_o one vnoi, 
zero) , of the field in the 
input record to be selected. 



, (comma) separates the 
entries in the parameter. 



//bUbTC,FU,A=(1000) ,B={1000) ,IU,0Y,R1, 
E=(2321) 



s indicates the length of the 
field in bytes. 



The format and entries for the utility 
modifier statement for this prograir are: 

//bUTMbTt , F f , A= ( input) , B= ( output ) , Ix , Ox , Rx , 
E=(e) 

Figure 20 shows detailed information of 
the entries in the utility ircdifier 
statement for the tape-to-data cell 
program. 



, separator. 



t indicates the starting 
position, relative to one, of 
the output record. 



/ (slash) separates selected 
fields. 



iQtry Reason 

//bU These entries identify this as a 
utility modifier statement. 

TMb The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



When a field is to be placed into a key 
field (data cell output), the letter K 
followed by a comma and the starting 
position of the field in the output record 
must be placed in parentheses. 



Example: //bFSbr, s, (K,t) 



Field Select Statement 

This statement provides the information for 
the file-to-file programs to transfer 
fields from an input record to the same or 
a different relative location of the output 
record. As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 
filled even if additional field select 
cards follow. The field selected must be 
complete on one statement. The format and 
contents of this statement are: 

//bFSbr, s,t/r, s,t/r,s,t 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, (P,n,m) , t 

P 

identifies the pack operation. 
n 

is the size of the input field. 
m 

is the size of the output field. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 
C 
F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 
The second F must be indicated for fixed-length records. 
The letter V must be indicated for variable-length records. 
The letter U must be indicated for undefined records. 


Input 
Description 


A=(n,m) 
A=(g) 


A= 

(n,m) 

A= 

(g) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length (the 
letter m) must be enclosed in parentheses and separated by a comma. 

For field select with variable length records, the letter n indicates the size of the fixed portion 
of each record, and the letter m indicates the maximum block size. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block 
length must be enclosed in parentheses." 


Output 
Description 


B=(n,m) 

B=(K=I,D=I) 
B=(g) 


B= 
(n,m) 

B= 
(K=I,D=I) 

B= 

(g) 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output 
block length (the letter m) must be enclosed in parentheses and separated by a comma. 

For field select with variable length records, the letter n indicates the size of the fixed portion of 
each record, and the letter m indicates the maximum block size. 

This letter and symbol indicate this is the output-description parameter. 

For fixed-length data cell output records with keys, the letter K and symbol = must precede the 
length of the key field. The letter D and symbol = must precede the length of the data field. 
These two fields must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the output-description parameter. 

For undefined output records or variable output records without field select, the maximum block 
length must be enclosed in parentheses. 


Rewind Input 
Ix 


IR 
IN 
lU 


1 

R 
N 
U 


The first letter in these forms identifies this parameter. The rewind option for the input tape is 
active both before and after data transfer. 

Rewind both before and after data transfer. 

Do not rewind either before or after data transfer. 

Rewind before and rewind and unload after data transfer. 


Data Cell 

Check 

Ox 


OY 
ON 


O 
Y 
N 


The first letter in these forms identifies this parameter. 

Write-dato cell check (forced for this program). 

Do not write-data cell check (ignored for this program). 



Figure 20. Tape-to-Data Cell Utility Modifier Stateirent (Part 1 of 2) 
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PARAMETER 



First Record 
Rx 



Device Type 
Description 



POSSIBLE 
FORMS 



Rx 



E=(e) 



ENTRIES 



E= 
(e) 



EXPLANATION 



The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be 
bypassed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 



This letter and symbol indicate this is the device type description parameter. 

For output devices the valid entry is 2321 . This entry must be enclosed in parentheses. 



Figure 20. Tape-to-Data Cell Utility Modifier Statement (Part 2 of 2) 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, {U,n,m) , t 

U 

identifies the unpack operation. 



is the size of the input field. 

m 

is the size of the output field. 

COPY VARIABLE 

When the section of a variable-length 
record, not defined as the fixed portion, 
is to be transferred to the output record, 
the letters CV (copy variable) irust be 
present in the field select statement. If 
this entry is made when processing records 
that have been defined as fixed length, an 
error will be indicated. The CV entry can 
be entered: 

• Before the first field to be selected. 

• Between selected fields. 

• Following selected fields. 

Exarrgl es : 

//bFSbCV/r , s , t/r , s , t 
//bFSbr , s , t/CV/r , s , t 
//bFSbr , s , t/r , s , t/CV 



The variable section of the record is 
placed in the output record following the 
fixed portion of the record as describes in 
the output description parameter. 



Control Statement Stream 

A sample control statement input stream for 
running a tape-to-data cell program from 
the disk resident relocatable library 
follows; device and file descriptions are 
peculiar tc the job being run- 



//bJOBbEXAWPLE 

//DASSGNbSYSLNK,X'19 0' 

//bASSGNbS YS 01 , X • 1 8 • 

//bASSGNbSYS004,X' 182' 

//bASSGNbS YSOl 4 , X ' 1 9 3 ' 

//bUPSIbl 0000000 (output standard label 

checking with unlabeled input) 
//bOPTIONbLINK 
bINCLUDEblJWTM 

bPHASEbTPCD5,IJWTMCS2,NOAUTO 
bINCLUDEblJWLAB 
bENTRY 

//bLBLTYPbTAPE 
//bEXECbLNKEDT 

//bDLBLbUOUT, • DATAbCELLbFILE ' , 67/3 00 
//bEXTENTbB=6 , SYS014 , 00111 , 1 , , 01 806 , 

00194 
//bEXEC 

//bUTMbTRF,FF,A=(110,440) ,B= (K = l C , D=l 00) ,0Y 
//bFSbl,10, (K,l)/ll, 100,1 
//bEND 
/& 
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Tape to Disk 



The tape-to-disk program transfers a file 
from one or rtuore tape reels to a maximum of 
n disk units where n is the nurrber of disk 
units assigned. These files may be copied, 
field selected, reblocked, or reblocked and 
field selected. If the field select or 
reblock options are used, the input records 
must be fixed or variable length. 



//bFSbr, s, t/r , s, t/r, s, t 

Contents Explan ation 
//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement- 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
If this statement is omitted from the 
program, the following parameters are 
assumed: 

//bUbTC,FU,A=(1000) ,B=(1000) ,IU,0Y,R1, 
E=(2311) 

The format and entries for the utility 
modifier statement for this program are: 

//bUTDbTt,,Ff,A=( input) ,B={cutput) ,Ix,Ox,Rx, 
E=(e) 

Figure 21 shows detailed information of 
the entries in the utility modifier 
statement for the tape-to- disk program. 

Reason 



These entries identify this 
statement as a utility modifier 
statement. 

The initials of the program. These 

initials can be omitted if the 

statement is used for more than one 
program. 



Field Select Statement 

This statement provides the information for 
the file-to-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 
filled even if additional field select 
cards follow. The field selected must be 
complete in one statement. The format and 
contents of this statement are: 




TDb 



r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of th 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the output record. 

/ (slash) separates selected 
fields. 

When a field is to be placed into a key 
field (disk output), the letter K followed 
by a comma and the starting position of the 
field in the output record must be placed 
in parentheses. 

Example: //bFSbr, s, (K,t) 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form : 

r, (P,n,m) ,t 

P 

identifies the pack operation. 



is the size of the input field. 



is the size of the output field. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 
C 
F 
R 
RF 


The initial T identifies this as the type of function parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 
The second F must be indicated for fixed-length records. 
The letter V must be indicated for variable-length records. 
The letter U must be indicated for undefined records. 


Input 
Description 


A=(n,m) 
A=(g) 


A= 
(n,m) 

A= 

(9) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 

For field select with variable length records the letter n indicates the size of the fixed portion 
of each record, and the letter m indicates the maximum block size. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block 
length must be enclosed in parentheses. 


Output 
Description 


B=(n,m) 

B=(K=I,D=I) 
B=(g) 


B= 
(n,m) 

B= 
(K=I,D=I) 

B= 

(9) 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block length 
(the letter m) must be enclosed in parentheses and separated by a comma. 

For field select with variable length records, the letter n indicates the size of the fixed portion of 
each record, and the letter m indicates the maximum block size. 

This letter and symbol indicate this is the output-description parameter. 

For fixed-length disk output records with keys, the letter K and symbol = must precede the length 
of the key field. Tine letter D and symbol = must precede the length of the data field. These two 
fields must be separated by a comma and enclosed in parentheses. 

This letter and symbol indicate this is the output-description parameter. 

For undefined output records or variable output records without field select, the maximum block 
length must be enclosed in parentheses. 


Rewind Input 
Ix 


IR 
IN 
lU 


1 

R 
N 
U 


The first letter in these forms identifies this parameter. The rewind option for the input tape is 
active both before and after data transfer. 

Rewind both before and after data transfer. 

Do not rewind either before or after data transfer. 

Rewind before and rewind end unload after data transfer. 



Figure 21. Tape-to-Disk Utility Modifier Staterrent (Part 1 of 2) 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Disk Check 
Ox 


OY 
ON 



Y 
N 


The first letter in these forms identifies this parameter. 

Write-disk check. 

Do not write-disk check . 


First Record 
Rx 


Rx 


R 

X 


The first letter in this form identifies this parameter. 

This represents the position of the first logical input record to be output (x-1 records will be 
bypassed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 


Device Type 
Description 


E=(e) 


E= 
(e) 


This letter and Symbol indicate this is the device type description parameter. 

For output devices the valid entries are 2311 and 2314. If a 2319 is used, 2314 must be specified. 
This entry must be enclosed in parentheses. 



Figure 21. Tape-to-Disk Utility Modifier Stateirent (Part 2 of 2) 



UNPACK 

When the input field is to be unpacked 

before it is placed in the output record, 

the field select parameter will appear in 
this form: 

r, (U,n,ra) , t 

U 

identifies the unpack operation. 



Examples : 

//bFSbCV/r , s , t/r , s , t 
//bFSbr , s , t/CV/r , s , t 
//tFSbr, s, t/r, s, t/CV 

The variable section of the record is 
placed in the output record following the 
fixed portion of the record as described in 
the output description parameter. 



is the size of the input field. 



is the size of the output field. 



COPY VARIABLE 

When the section of a variable-length 
record, not defined as the fixed portion, 
is to be transferred to the output record, 
the letters CV (copy variable) irust be 
present in the field select statement. If 
this entry is made when processing records 
that have been defined as fixed length, an 
error will be indicated. The CV entry can 
be entered: 

• Before the first field to be selected. 

• Between selected fields. 

• Following selected fields. 



Control Statement Stream 

A sairple control statement input stream for 
running a tape-to-disk program from the 
core image library follows; device and file 
descriptions are peculiar to the job being 
run. 

//bJOBbEXAMPLE 

//bASSGNtSYSOOU,X' 182' 

//bASSGNbSYS007,X*191* 

//bUPSIbl 1000000 (nonstandard input label 
checking, assume nonstandard user label 
routine has been cataloged as the fifth 
phase of this program in the core image 
library) 

//bDIBLbUOUT, 'DISKbFILE' ,67/30 

//bEXTENTbSYS007,000123,l,0,00176,0000 4 

//bEXTENTbSYS 007, 00012 3, 1,1, 00 86 0,0004 

//bEXECbTPDK 

//bUTDbTR,FV,A=(320) ,B=(600) ,OY,rN 

//bEND 

/& 
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Tape to Printer 



The tape-to-printer prograir can display a 
tape file in either data display cr data 
list format. Data display provides a 
byte-for-byte representation of the data 
file where every byte appears in the 
listing; this format can handle fixed, 
variable, and undefined records. Data list 
provides a simple edited representation of 
the file; input records must be fixed or 
variable length and {for the data list 
function only) must not exceed the size of 
the print line. The field select cpticn 
may be used. An option is available to 
this program to specify the number of 
logical records in a file to be bypassed 
before printing begins. 



Field Select Statement 

This statement provides the information for 
the file-tc-file program to transfer fields 
from an input record to the same or a 
different relative location of the output 
record. This is valid only for data list 
mode. As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need not be 
filled even if additional field select 
cards follcw. The field selected must be 
complete in one statement. The format and 
contents of this statement are: 

//bFSbr, s, t/r, s, t/r, s, t 



^2Stents Explanation 
//bFSb //b identifies this as a 
control statement . 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
If this statement is omitted from the 
program, the following parameters are 
assumed: 



//bUbTD,FU,A={1000) ,B=(120) ,IU ,CX, FY ,R1,S1 



The format and entries for the utility 
modifier statement for this program are: 



//bUTPbTt,Ff,A=( input) ,B=(output) , Ix,Ox,Px, 
Rx,Sx 



FS identifies this as a field 
select control statement. 

r,s,t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in bytes. 

, separator. 

t indicates the starting 
position, relative to one, of 
the print line. 

/ (slash) separates selected 
fields. 



Figure 22 shows detailed information of 
the entries in the utility modifier 
statement for the tape-to-printer program. 



UNPACK 



?Dt£i 5§2Son 



//bU These entries identify this as a 
utility modifier statement. 



TPb The initials of the program. These 

initials can be omitted if the 

statement is used for more than one 
program. 



When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U,n,m) , t 

U 



n 



identifies the unpack operation, 
is the size of the input field. 



is the size of the output field. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TD 
TL 
TLF 


T 
D 
L 
LF 


The initial T identifies this as the type of function parameter. 

Display 

List 

List and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 

The second F must be indicated for fixed-length records. 

The letter V must be indicated for variable-length records. 

The letter U must be indicated for undefined records. 

Witfi undefined records, the only valid entry above is data display. 


Input 
Description 


A=(n,m) 
A=(g) 


A= 

(n,m) 

A= 

(g) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and the 
letter m indicates the maximum block size. 

This letter and symbol indicate this is the input-description parameter. 

For undefined input records or variable input records without field select, the maximum block length 
must be enclosed in parentheses. 


Output 
Description 


B=(p) 
B=(n,p) 


B= 
(p) 

B= 
(n,p) 


This letter and symbol indicate this is the output-description parameter. 

For printer output, the size of the print line (120, 132, or 144) must be entered. 
A print line size of 120 is forced if TD is specified. 

This letter and symbol indicate this is the output-description parameter. 

For field select of variable length records with printer output records, the fixed portion of each 
output record (the letter n) and the size of the print line (the letter p) must be enclosed in 
parentheses and separated by a comma. 


-Rewind Input 


IR 

IN 

lU 


1 

R 
N 
U 


The first letter in these forms identifies this parameter. The rewind option for the input tape is 
active both before and after data transfer. 

Rewind both before and after data transfer. 

Do not rewind either before or after data transfer. 

Rewind before and rewind and unload after data transfer. 


Print Output 
Ox 


OX 
OC 


O 
X 
C 


The first letter in these forms identifies this parameter. 
Hexadecimal Printout (for dote display only) 
Character Printout (forced for data list) 

The type of output indicated by the field-select parameter (hexadecimal or character) overrides 
this parameter. 



Figure 22. Tape-to-Printer Utility' Modifier Stateirent (Part 1 of 2) 



Tape to Printer 7' 



PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Spacing 
Option Sx 


SI 
S2 
S3 
SA 
SB 
SC 
SD 


S 
1 

2 
3 
A 
B 
C 

r\ 


The first letter in these forms identifies this parameter. 

Single Spacing (forced for data display) 

Double Spacing 

Triple Spacing 

Type A First Character Forms Control 

Type B First Character Forms Control 

Type C First Character Forms Control 

Type D Fint Charucter Forms Control 


Page- 
Numbering 
Px 


PY 
PN 


p 

Y 
N 


The first letter in these forms identifies this parameter. 

Number pages (forced for data display) 

Do not number pages (forced for first character forms control) 


First Record 
Rx 


Rx 


R 

X 


The first letter in these forms identifies this parameter. 

This represents the position of the first logical record to be printed; x-1 will be bypassed. 



Figure 22. Tape-to-Printer Utility Modifier Stateirent (Fart 2 of 2) 



HEXADECIMAL 

When a program has printed output, the 
field selected may be printed in 
hexadecimal representation. This cperation 
is indicated as follows: r,(X,n),t 

X identifies the hexadecimal operation. 

n is the size of the input field. 

Only the field length of the input is 
necessary for this operation because the 
output length will always be assumed to be 
twice as large. X and n are enclosed in 
parentheses and separated by a comma. 



COPY VARIABLE 

When the section of a variable-length 
record, not defined as the fixed portion is 
to be transferred to the output record, the 
letters CV (copy variable) must be present 
in the field select statement. If this 
entry is made when processing records that 
have been defined as fixed length, an error 
will be indicated. The CV can be entered: 

• Before the first field to be selected. 

• Between selected fields. 



Following selected fields. 



Examples : 

//bFSbCV/r , s , t/r , s , t 
//bFSbr,s,t/CV/r,s,t 
//DFSbr , s , t/r , s , t/CV 

The variable section of the record is 
placed in the output record following the 
fixed portion of the record as described in 
the cutput description parameter. 



Control Statement Stream 

The sample control stateirent input stream 
for running a tape-to-printer program from 
the core image library fellows; device and 
file descriptions are peculiar to the job 
being run. See page 27 for a description 
of the heading statement. 

//bJOBbEXAMPLE 

//bASSGNbSYS00 4,X'18 2" 

//bASSGNbSYS005,X' OOE' 

//bUPSIbl 0000000 (no label checking) 

Z/bEXECbTPPR 

//bUTPbTLF, FV, A= (3 7, 98 ),E=( 4 0, 132 ),PN, DC, S2 

//bFSbl, 37,1/CV 

//bEND 

/& 
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Tape to Tape 



The tape-to-tape program transfers a file 
from one or more tape reels to one or irore 
other reels. These files may be copied,, 
reblocked, field selected, or reblocked and 
field selected. If the reblock or field 
select options are used, the input records 
must be fixed or variable length. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program, 
If this statement is oiritted from the 
program, the following parameters are 
assumed: 

//bUbTC,FU,,A={ 1000), B= (1000), IU,CU,R1 

The format and entries for the utility 
modifier statement for this program are: 

//bUTTbTt,Ff,A= (input) ,B= (output) ,Ix,,Ox,Rx 

Figure 23 shovis detailed inforiration of 
the entries in the utility modifier 
statement for the tape-to-tape program. 



Entry 
//bU 



TTb 



Reason 

These entries identify this as a 

utility modifier statement. 

The initials of the program. These 
initials can be omitted if the 
statement is used for more than one 
program. 



Field Select Statement 

This statemsent provides the information for 
the file-to-file programs to transfer 
fields from an input record to the same cr 
a different relative location of the output 
record- As many field select statements as 
necessary may be used. If the statement is 
punched in cards, each card need net be 
filled even if additional field select 
cards follow. The field selected must be 
complete on one card. The format and 
contents of this statement are: 

//bFSbr , s , t/r, s, t/r, s , t 

Contents Explanatio n 
//bFSb //b identifies this as a 
control statement. 

FS identifies this as a field 
select control statement. 



r, s, t/ r indicates the starting 

position, relative to one (not 
zero) , of the field in the 
input record to be selected. 

, (comma) separates the 
entries in the parameter. 

s indicates the length of the 
field in .bytes. 

, separator. 

t indicates the starting 
position, relative to one,, of 
the output record. 

/ (slash) separates selected 
fields. 



PACK 

When the input field is to be packed before 
it is placed in the output record, the 
field select parameter will appear in this 
form: 

r, (P,n,m) ,t 

P 

identifies the pack operation. 



is the size of the input field. 



is the size of the output field. 



UNPACK 

When the input field is to be unpacked 
before it is placed in the output record, 
the field select parameter will appear in 
this form: 

r, (U,n,m) ,t 

U 

identifies the unpack operation. 



is the size of the input field. 



is the size of the output field. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Function 
Tt 


TC 
TF 
TR 
TRF 


T 
C 

F 
R 
RF 


The first letter in these forms identifies this parameter. 

Copy 

Field Select 

Reblock 

Reblock and Field Select 


Format 
Ff 


FF 
FV 
FU 


F 
F 
V 
U 


The leading F of these three possible forms identifies this as the format parameter. 
The second F must be indicated for fixed-length records. 
The letter V must be indicated for variable-length records. 
The letter U must be indicated for undefined records. 


Input 
Description 


A=(n,m) 
A-(g) 


A= 
{n,m) 

A= 

(g) 


This letter and symbol indicate this is the input-description parameter. 

For fixed-length input records, the input record length (the letter n) and the input block length 
(the letter m) must be enclosed in parentheses and separated by a comma. For field select with 
variable length records the letter n indicates the size of the fixed portion of each record, and the 
letter m indicates the maximum block size . 

This letter and symbol indicate this is the input-d«cription parameter. 

For undefined input records or vorioble input records without field select, the maximum bJock 
length must be enclosed in parentheses. 


Output 
Description 


B=(n, m) 
B=(g) 


B= 
(n,m) 

B= 

(g) 


This letter and symbol indicate this is the output-description parameter. 

For fixed-length output records, the output record length (the letter n) and the output block 
length (the letter m) must be enclosed in parentheses and separated by a comma. For field 
select with variable length records, the letter n indicates the size of the fixed portion of each 
record, and the letter m indicates the maximum block size. 

This letter and symbol indicate this is the output-description parameter. 

For undefined output records or variable output records without field select, the maximum block 
length miBt be enclosed in parentheses. 


Rewind 
Option for 
Input 
Ix 


IR 
IN 
lU 


1 

R 
N 
U 


The first letter in these forms identifies this parameter. The rewind option for the input tape is 
active both before and after data transfer. 

Rewind both before and after data transfer. 

Do not rewind either before or after data transfer. 

Rewind before and rewind and unload after data transfer. 


First Record 
Rx 


Rx 


R 
x 


The first letter in this form identifies this parometer. 

This represents the position of the first logical input recond to be output (x-1 records will be 
bypassed). If the file is to be copied, the function parameter must be indicated to be reblocked 
and the input and output file description parameters must contain identical values. 


Rewind Out- 
put Ox 


OR 
ON 
OU 


O 

R 

N 

U 


The first letter in these forms identifies this parameter. The rewind option for the output tape 
is active both before and after data transfer. 

Rewind both before and after data transfer. 

Do not rewind either before or after data transfer. 

Rewind before and rewind and unload after data transfer. 



Figure 23. Tape-to-Tape Utility Modifier Statement 
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COPY VARIABLE 

When the section of a variable-length 
record, not defined as the fixed portion, 
is to be transferred to the output record, 
the letters CV (copy variable) must be 
present in the field select statement. If 
this entry is irade when processing records 
that have been defined as fixed length, an 
error will be indicated. The CV entry can 
be entered: 

• Before the first field to be selected. 

• Between selected fields. 

• Following selected fields. 

Examgle s : 

//bFSbCV/r , s , t /r , s, t 
//bFSbr , s , t/CV/r , s , t 
//bFSbr,s, t/r, s,t/CV 

The variable section of the record is 
placed in the output record following the 



fixed portion of the record as described in 
the output description parameter. 



Control Statement Stream 

A sample control statement input stream for 
running a tape-to-tape program fromi the 
core image library follows; device and file 
descriptions are peculiar to the job being 
run. 

//bJOBbEXAiyiPLE 

//bASSGNbSYS00 4,X' 180' ,X"A8' 

//bASSGNbSYS005,X' 181' 

//bTLBLbUOUT, ' EXAMPLEbFILE ' , 67/3 CO , 00012 3 , 

0001, 0001,0001,01 
//bUPSIbl 0000000 (unlabeled input and 

standard output labels) 
Z/bEXECbTPTP 
//bUTTbTR,FF,A=(100, 10 0) ,B= (IOC, 10 00) ,0U , 

IR 
//bEND 
/& 
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Assign Alternate Track— Data Cell 



The assign alternate track-data cell 
program is designed to assign an alternate 
track on an IBM 2321 Data Cell at any time 
other than when initializing the data cell. 
An alternate track can also be unassigned, 
with the data being reinstated to the 
primary track. If an alternate track is 
found defective, you must specify a new 
alternate to the original primary track. 
If update records are supplied as input, 
the program will use them to replace bad 
records on a specified track. 



ASSIGNING AN ALTERNATE TRACK 

At the beginning of this program, the 
format 4 record of the volume table of 
contents (VTOC) is checked to determine the 
next alternate track to be assigned. If no 
alternate track is available, the condition 
is logged and the job is terminated. 

If an alternate track is assigned, the 
records contained on the defective track 
are transferred to the alternate track 
beginning with the data portion of record 
zero (RO) and continuing with the count, 
key, and data of Rl through Rn. The record 
in error is transferred to the alternate 
track as read. The address of the 
alternate track is written in the track 
descriptor record (RO) of the defective 
track. This address is used as a pointer 
to the proper alternate track. 

Surface analysis is performed on the 
track in error, if it has been specified, 
after all records have been transferred to 
the alternate track. If the error is 
permanent, this is flagged as a defective 
track. 1:he track is also flagged as 
defective if surface analysis is not 
specified. 

If the error is only temporary, the data 
is transferred back to the originally 
defective track and the flag byte of the 
original track is reset to indicate a good 
track. A record that is written on the 
alternate track in error will be 
transferred back in error. The flag byte 
of the alternate track is set to indicate 
that this track is unassigned, and the 
format 4 record is modified to indicate the 
address of the next available alternate 
track to be assigned. 

If at the completion of surface analysis 
of the defective track, it is determined 
that the home address and/or the track 
descriptor record (RO) area is defective. 



the track is then flagged defective and 
points to the alternate track by advancing 
the home address and RO 800 bytes. If an 
error occurs at this time, the data remains 
on the alternate track and the job is 
terminated. 

Effects of Defective Areas 

The location of defective areas on the 
defective track may affect the transfer of 
records to the alternate track or cause the 
program to end. The possible location of 
defective areas and their effect on program 
processing are: 



Defective Area 
Location 

Address marker 
cf a reccrd 

or 
Gap preceding 
the count area 
of a record 

or 
Count area of 
record 



Key area of a 
record 

or 
Data area cf a 
record 



Gap following 
the count area 
of a record 



Effect 

The record is bypassed 
(it will not be trans- 
ferred to the alternate 
track) . 



Gap following 
the key area of 
a record 



The record is trans- 
ferred to the alternate 
track exactly as it is 
read. 



The count area is trans- 
ferred to the alternate 
track. The remainder of 
the record (key and data 
area) filled with A's on 
the alternate track. 



The data is unrecover- 
able. 



Gap between the The records are trans- 
data area of a ferred to the alternate 
record and the track exactly as they 
address marker of are read, 
the next record 

Record_Printin3_0gtion 

The program allows the option of printing 
all records transferred to the alternate 
track or only those that were read in error 

from the defective track. Ycu specify your 
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choice in the utility irodifier staterrent. 
The records are printed on the device 
assigned to SYSLST. However, if an error 
is found in the home address or track 
descriptor record of the defective track, 
all records are printed, regardless of the 
specification in the utiliity modifier 
statement. 

Upda te Record 

The last phase of the prograrr will 
recognize any nuiriber of update records if 
you specify the update parameter on the 
utility modifier stateirent. Each update 
record must be immediately preceded in the 
input stream by a track statement, which 
specifies the location at which the update 
record should be written. The program 
writes an update record at the location 
specified by the preceding track stateirent, 
whether or not a record already exists at 
this location. (If the addition of an 
update record causes the track capacity to 
be exceeded, the program writes an error 
message and then terminates. In this case, 
the last record on the track may be 
invalid. ) 

Update records must appear in 
hexadecimal representation, two characters 
per byte, in the input stream. They must 
include the key and data portions cf the 
record. Do not imbed insignificant 
characters in an update record: that is, 
use every column of each input record until 
all the data has been supplied. Forty 
bytes of data will fit in one 80-column 
input record. 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program. 
The first entry R=(cccchhh) must be 
supplied and the following parameters are 
assumed: 

//bUbR=(cccchhh) ,OY,IF,UN 

The format and entries for the utility 
modifier statement for this program are: 

//bUATbR= { cccchhh) , Ox, Ix, Ux 

Reason 



R= 



Entry 
//bU 



ATb 



These entries identify 
the utility modifier 
statement. 

These letters indicate 
that this is the 
alternate track 
assignment program. 
These entries can be 
omitted. 



[ciCaCaCahi^hshs) 



Ox 



Ix 



This letter and symbol 
indicate this is the 
track location 
parameter. 

This entry indicates the 
track to which an 
alternate or a new 
alternate track is to be 
assigned, or a track 
that is to have its 
condition flag changed 
from defective to 
nondefective- 

Ci=cell (0-9) 
C2C2=subcell (00-19) 
C3=strip (0-9) 
h4=cylinder (0-4) 
h5h5=track (00-19) 

These entries must be 
enclosed in parentheses. 
Note that only strip 0-5 
may be specified with 
subcell 19. 

Identifies this 
parameter as the output 
option parameter. 

x=Y indicates that all 
records are to be 
printed as they are 
transferred to the 
alternate track. 

x=N indicates that only 
the record or records 
found to be in error are 
to be printed. 

Identifies this 
parameter as the input 
option parameter. 

x=F indicates that an 
alternate track will be 
assigned without 
performing a surface 
analysis. This is the 
assumed option when the 
Ix parameter is omitted. 



x=A indicat 
surface ana 
be performe 
specified t 
an alternat 
already ass 
if the erro 
permanent, 
track will 



es that 
lysis should 
d on the 
rack (or on 
e, if one is 
igned) and, 
r is 

an alternate 
be assigned. 



x=U indicates that the 
flag from a defective 
track is to be 
unconditionally removed 



Assign Alternate Track-Data Cell 



and the data recopied 
onto the primary track. 
Any error in the 
transfer of data will be 
indicated to the 
operator. 

Ux Identifies this 

parameter as the update 
parameter. 

x=Y indicates that one 
or more update records 
will follow in the input 
stream. 

x=N indicates that no 
update records will 
follow in the input 
stream. 



Track Statement 

The format and entries for the track 
statement for this program are: 

TRACK=cccchhhhrrkkdddd [S] 



Entry 
TRACK= 



Reason 

This entry indicates 
that this is the record 
location parameter. 



ciCiC2C2hihih2h2rrkkddddtS] 

This entry specifies the 
track location and 
record description 
necessary for the 
utility to write the 
update record. This 
information must be 
specified in hexadecimal 
representation. 



cici=subcell (00-13). 
C2C2=strip (00-09) . 
hihi=cylinder (00-04), 
h2h2=track (00-13). 
rr=record number 
(00-FF). 

kk=key length (00-Ff) 
dddd=data length 
(0000-FFFF) . 

S must appear if the 
record is to be written 
using the write special 
count, key and data 
command. 

Control Statement Stream 

A sample control statement input stream for 
running an assign alternate track-data cell 
program follows: 

//bJOBbALTRK 
//bASSGNbSYS000,X' 293' 
Z/bEXECbATAM 

//bUATbR=(2050212),OY,IA 
/% 

A sample control statement input stream 
to use this program to update a record 
follows: 

//bJOBbUPDATE 

//bASSGNbSYS000,X' 293* 

Z/bEXECbATAM 

//bUATbR=( 2050212) ,OY,IA,UY 

TRACK=05 0002 0C04 00 0050 

(first 40 bytes of update record) 



/* 



(last 40 bytes of update record) 
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Assign Alternate Track^Disk 



Use the assign alternate track-disk program 
with the IBM 2311 Disk Storage Drive, the 
IBM 2314 Direct Access Storage Facility, or 
the IBM 2319 Disk Storage. The program 
functions are to assign an alternate track 
to a defective track, to change the flag 
indicating the track's condition from 
defective to nondef ective, and if update 
records are supplied as input, to replace 
bad records on a track. Also, if an 
alternate track is found defective, you 
must specify a new alternate to the 
original primary track. Specifications 
contained in the utility modifier statement 
indicate which function the program is to 
perform. 



Effects of Defective Areas 

The location of defective areas en the 
defective track may affect the transfer of 
of records to the alternate track or cause 
the program to end. The possible location 
of defective areas and their effect on 
program processing are: 



Defective Area 
Location 

Address marker 
of a record 

or 
Gap preceding 
the count area 
of a record 

or 
Count area of a 
record 



Effect 

The record is bypassed 
(it will net be trans- 
ferred to the alternate 
track) . 



ASSIGNING AN ALTERNATE TRACK 

The defective track is identified by 
specifications in the utility modifier 
statement. The alternate track is 
identified by the format 4 record cf the 
volume table of contents (VTGC) on the disk 
pack. The records from the defective track 
are transferred to the alternate track, 
beginning with the data area of the track 
descriptor record (RO) . The VTOC format 4 
record is modified to contain the address 
of the next available alternate track. The 
condition of the defective track may then 
be analyzed, depending upon your 
specifications in the utility modifier 
statement. 



When the condition of the track is not 
analyzed, or when it is analyzed and found 
to be defective, the track is flagged 
defective and the track descriptor record 
is modified to contain the address of the 
alternate track. When the condition of the 
track is analyzed and found to be 
nondef ective, the track is flagged 
nondef ective, the records are transferred 
back to the track from the alternate track, 
and the VTOC form.at 4 record is reset to 
indicate that the alternate track is still 
available for assignment. 



Key area of a 
record 

or 
Data area cf a 
record 

Gap following 
the count area 
cf a record 



The record is trans- 
ferred to the alternate 
track exactly as it 
is read. 



The count area is trans- 
ferred to the alternate 
track. The remainder 
of the record (key 
area and data area) 
on the alternate track 
is filled with A's. 

The count area and key 
area of the record are 
transferred to the al- 
ternate track. The 
data area of the re- 
cord on the alternate 
track is filled with 
A' s. 



Gap between the The records are trans- 
data area cf a ferred to the alter- 
record and the nate track exactly as 
address marker of they are read, 
the next record 



Gap following 
the key area of 
a record 



Home address of 
the track 

or 
Track descriptor 
record (RO) 



IBM_2311: The program 
is ended (the track 
cannot be flagged de- 
fective) . 



The program is complete when an 
alternate track has been assigned cr when 
the defective track has been found 
nondefective and flagged accordingly- 



IBM_ 2 3 1 4/ 2 3 1 9 : The gap 
between the track index 
marker and home address 
is extended by 705 bytes 
and an attempt is made to 
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write the home address 
and track descriptor 
record following the 
extended gap. If the 
home address or track 
descriptor record cannot 
be written, the program 
is ended (the track 
cannot be flagged 
defective) . 

Record_Printing_0£tion 

The program allows the option cf printing 
all records transferred to the alternate 
track or only those that were read in error 
from the defective track. You specify your 
choice in the utility modifier statement. 
The records are printed on the device 
assigned to SYSLST. However, if an error 
is found in the home address or track 
descriptor record of the defective track, 
all records are printed regardless of the 
specification in the utility modifier 
statement. 



CHANGING TRACK-CONDITION INDICATION 

The program performs this function for 
tracks that have been previously flagged 
defective and to which alternate tracks 
have been assigned. The track flagged 
defective is specified in the utility 
modifier statement. The alternate track is 
identified in the track descriptor record 
of the specified track. 

The program flags are specified track 
nondefective without analyzing the 
condition of the track. The records from 
the alternate track are transferred back to 
the specified track and the address of the 
alternate track is removed froir the track 
descriptor record of the specified track. 
(Any error encountered in the transfer is 
indicated to the operator.) The flag byte 
on the alternate track is changed to 
indicate that the alternate track is not 
assigned. If this alternate track was the 
last alternate track assigned, the VTOC 
format 4 record is changed to indicate that 
this track is not the next alternate track 
available for assignment. Otherwise, the 
VTOC format 4 record is not changed and the 
alternate track cannot be assigned using 
this program. 

Update Re cord 

The last phase of the program will 
recognize any number of update records if 



you specify the update parameter on the 
utility modifier statement. Each update 
record must be immediately preceded in the 
input stream by a track statement, which 
specifies the location at which the update 
record should be written. The program 
writes an update record at the location 
specified by the preceding track stateirent, 
whether or not a record already exists at 
this location. (If the track capacity to 
be exceeded, the program writes an error 
message and then terminates. In this case, 
the last record on the track may be 
invalid. ) 



The track to which an alternate has been 
assigned and the track stated in the TRACK= 
statement must be the same. 



Update record 
hexadecimal repr 
per byte, in the 
include the key 
record. Do not 
characters in an 
use every column 
all the data has 
bytes of data wi 
input record. 



s must appear in 

esentaticn, two characters 
input stream. They must 

and data portions of the 

imbed insignificant 
update record: that is, 
of each input record until 
been supplied. Forty 

11 fit in one 80-column 



Utility Modifier Statement 

This statement contains information 
required for the operation of this program: 
The first entry R=(cccchhh) must be 
supplied and the following parameters are 
assumed: 



//bUbR=(cccchhh) ,OY,IF,UN 

The format and entries for the utility 
modifier statement for this program are: 

//bUATbR=(cccchhh) ,Ox,Ix,Cn,Ux 

Figure 24 shows detailed information of 
the entries in the utility modifier 
statement for the assign alternate 
track-disk program. 

//bU These entries identify this as a 
utility modifier statement. 

ATb The initials of the program. These 
initials can be emitted. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Track 
Location 


R= (cccchhh) 


R= 
(cccchhh) 


This letter and symbol indicate this is 
the track location parameter. 

This entry indicates the track to which 
an alternate or a new alternate track is 
to be assigned, or which is to have its 
condition flag changed from defective to 
nondefective (cccc denotes the cylinder 
number -- cylinders 0-199 only — and 
hhh denotes the head number) . These 
entries must be enclosed in parentheses. 


Output 
Option 

Ox 


OY 

ON 



Y 

N 


The first letter in these forms identi- 
fies this as the output option parameter. 

All records are to be printed as they 
are transferred to the alternate track. 

Only the record (s) found to be in error 
is to be printed. 


Input 
Option 

Ix 


IF 
lA 
lU 


I 
F 
A 

U 


The first letter in these forms identi- 
fies this as the input option parameter. 

The specified track should be flagged 
without surface analysis. 

Surface analysis shoula be performed on 
the specified track if the track has not 
been previously flagged. If the primary 
track has been flagged, then the alter- 
nate track assigned will have surface 
analysis performed on it. 

The flag from a defective track should 
be unconditionally removed and the data 
recopied onto the prime track. Any error 
in the transfer of data will be indica- 
ted to the operator. 


Count 
Option 

Cn 


Cn 


C 

n 


The first letter in this form identifies 
this as the count option parameter. 

A decimal value of 1 to 255 should be 
entered indicating the number of times 
surface analysis is to be performed. 
This parameter is ignored if the input 
parameter is IF or lU. Enlarging this 
parameter causes a proportional increase 
in program run time. 


Update 
Option 

Ux 


UY 
UN 


U 

Y 

N 


The first letter in these forms 
identifies this as the update option 
parameter. 

One or more update records will 
follow in the input stream. 

No update records will follow in the 
input stream. 



Figure 24. Assign Alternate Track-Disk Utility Modifier Statement 
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Track Statement 

The format and entries for the track 
statement for this program are: 



TRACK=cccchhhhrrkkdddd [S3 



Control Statement Stream 

A sairple control statement input streair for 
running an assign alternate track-disk 
program from the core image library 
follows; device and file descriptions are 
peculiar to the job being run. 



^ntr^ Rsason 

TRACK= This entry indicates that this is 

the record location parameter. 

This entry must refer tc the 

primary track to which an alternate 

has been assigned. 



cccchhhh rrkkddddlSj 

This entry specifies the track 
location and record description 
necessary for the utility to write 
the update record. This 
information must be specified in 
hexadecimal representation. 



c c c c =cylinder number, 
h h h h =track number. 
rr=record number (00-FF). 
kk=key length (00-FF). 
dddd=data length (0000-FFFF). 



S must appear if the record is to 
be written using the write special 
count, key and data command. 



//bJOBbEXAMPLE 
//bASSGNbSYSOOO,X* 191* 
Z/bEXECbATAD 

//bUATbR=(0027003) ,IA,C3,CY 
/£ 



A sample control statement input stream 
tc update two records follows: 



//bJOBbUPDATE 

//ASSGNbSYSOOO ,X' 192 ' 

Z/bEXECbATAD 

//bUATbR= (0004 002) ,IA,C3,0Y,UY 

TRACK=00 040002 03 000050 

(first 40 bytes of update record) 
(last 40 bytes of update record) 

TRACK=00040002 04 0001EO 

(first 40 bytes of update record) 



/* 



(last 40 bytes of update record) 
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Clear Data Cell 



The clear-data cell prograir clears one or 
more areas of the IBM 2321 Data Cell Drive, 
and establishes preformatted tracks 
containing an indicated base throughout the 
area cleared. The control information for 
the operation of this prograir is entered in 
three types of control statements. 



The first type of control statement (job 
control) defines channel and unit 
assignment, physical-device description, 
and areas of the data cell to be processed. 
The second type of control stateirent 
(utility modifier) contains the information 
unique to this program. The third type of 
statement is an END card. 

The area to be cleared can be as small 
as one track or up to a maxirrurr of a 
complete data cell. Any number of areas 
can be designated to be cleared with one 
run of this program. When an area of data 
cell is cleared, fixed-length blocks 
containing count, key, and data areas are 
established on the data cell. The 
information defining the key and data areas 
is indicated in the utility modifier 
statement, or, if a utility modifier 
statement is not entered, values are 
assumed. The count area is generated with: 

Cylinder number (2 bytes) 
Head number (2 bytes) 
Record number (1 byte) 
Key length (1 byte) 
Data length (2 bytes) . 

The key and data areas defined, with the 
exception of the first eight bytes of the 
data portion of the track descriptor record 
(RO) , are filled with a user-defined 
character. The first eight bytes of the 
data portion of the track descriptor record 
(RO) are written: 

Bytes 1-2 - Cylinder number 

Bytes 3-1 - Head number 

Byte 5 - Record number (always zerc). 

Bytes 6-7 - Number of unused bytes on the 
track 

Byte 8 - Binary zero. 

Label checking determines whether the 
area to be cleared contains all or part of 
an unexpired file. Expired labels for the 
area to be cleared are deleted from the 
VTOC (volume table of contents). 



Utility Modifier Statement 

This statement allows three parameter 
entries. The first parameter defines the 
length of the key and data block. The 
second parameter defines the fill 
character. The third parameter allows the 
cpticn to write data cell check or not 
write data cell check. The format and 
entries for this parameter are: 

//bUCMbB=(K=l,D=l) ,(c'c' 1 ,o(y (,E=(e) 

X'xx'j (N 

If the utility modifier stateirent is 
emitted, the assumed values are: 

//bUCMbB=(K=0,D=100) ,X'00*,OY,E=(2321) 

^H^Ll Rea son 

//bU These entries identify this as a 
utility modifier statement. 

CMb The initials of the program. These 
initials can be omitted. 



B=(K=1,D=1) B= 



(K=l, 
D=l) 



C'C' 



C'C' 



X'xx' 



X'xx' 



OY 
or 

ON 



Explanation 
Identifies this 
parameter. 



Indicates the length of 
the key and data block 
in bytes. If a key 
length is not desired, 
the key length must 
equal zero. 

C is entered and 
followed by the fill 
character (EBCDIC) 
enclosed in 
apostrophes. 

X is entered and 
followed by the 
hexadecimal fill 
character enclosed in 
apostrophes. 

Identifies this as the 
output parameter. 



Indicates write data 
cell check (forced for 
this program). 

Indicates do not write 
data cell check 
(ignored for this 
program). 
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Parameter lDt£Y Explanation 

E=(e) E= Indicates this is the 

device type description 
parameter. 

(e) For output devices, the 
valid entry is 2321. 
This entry rrust be 
enclosed in 
parentheses. 

END Statement 

This must be the last control statement. 
The statement is entered: 

//bEND 

Entry Reason 

//b These entries identify this as a 
control statement. 



END 



This entry indicates that this is 
the last control statement. 



This program is resident in the core 
image library in three phases: 

CLDC 

CLDC2 

CLDC3 



tuonirol statement Stream 

A sample control statement input stream for 
running a clear data cell program from the 
core iirage library follows; device and 
extent descriptions are peculiar to the job 
being run. 

//bJ0BbEXA^5PLE 

//bASSGNbSYS008,X' 193* 

//bDLBLbUOUT,'FILEbLABEL' ,67/300 

//bEXTENTbB=4,SYS008,0 00012,l,0,05 00 0,00100 

//bEXECbCLDC 

//bUCiyibB=(K=0,D=90 0) ,C'X' 

//bEND 

/& 
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Clear Disk 



The clear-disk program clears one or mere 
areas of disk on the IBM 2311 Disk Storage 
Drive, the IBM 2314 Direct Access Storage 
Facility, or the IBM 2319 Disk Storage, and 
establishes preformatted tracks containing 
an indicated base throughout the area 
cleared. Both types of 

disks cannot be cleared in the same job. 
The control information for the operation 
of this program is entered in three types 
of control statements. 



The first type of control statement (job 
control) defines channel and unit 
assignment, physical-device description, 
and areas of disk to be processed. The 
second type of control statement (utility 
modifier) contains the information unique 
to this program. The third type of 
statement is an END card. 



The area to be cleared can be as small 
as one track or up to a maximum of a 
complete disk pack. Any number of areas 
can be designated to be cleared viith one 
run of this program. When an area of disk 
is cleared, fixed-length blocks containing 
count, key, and data areas are established 
on the disk. The information defining the 
key and data areas is indicated in the 
utility modifier statement, or, if a 
utility modifier statement is not entered, 
values are assumed. The count area is 
generated with: 



Cylinder number (2 bytes) 



Head number (2 bytes) 



Record number (1 byte) 



Key length (1 byte) 



Data length (2 bytes) . 



The key and data areas defined, with the 
exception of the first eight bytes of the 
data portion of the track descriptor record 
(RO) , are filled with a user-defined 
character. The first eight bytes of the 
data portion of the track descriptor record 
(RO) are written: 



Bytes 1-2 - Cylinder number 

Bytes 3-4 - Head number 

Byte 5 - Record number (always zero) 

Bytes 6-7 - Number of unused bytes on the 
track 

Byte 8 - Binary zero. 

This program requires that the DLBL card 
indicate a sequential file. Label checking 
determines whether the area to be cleared 
contains all or part of an unexpired file. 
Expired labels for the area to be cleared 
are deleted from the VTOC (volume table of 
contents) . 

Utility Modifier Statement 

This statement allows three parameter 
entries. The first parameter defines the 
length of the key and data block. The 
second parameter defines the fill 
character. The third parameter allows the 
option to write disk check or not to write 
disk check. The format and entries for 
this parameter are: 

//bUCLbB=(K=l,D=l) ,( C'c^ j ,0J Y(,E=(e) 

X'xx'j In 

If the utility modifier statement is 
omitted, the assumed values are: 

//bUCLbB=(K=0,D=100) ,X'00' ,OY,E=(2311) 
^H^LY Reas on 

//bU These entries identify this as a 
utility modifier statement. 

CLb The initials of the program- These 
initials can be omitted. 

Parameter Entry Explanation 

B=(K=1,D=1) B= 



(K=l, 
D=l) 



Co' 



C'c' 



Identifies this para- 
meter. 

Indicates the length of 
the key and data block 
in bytes. If a key 
length is not desired, 
the key length must be 
zero. 

C is entered and 
followed by the fill 
character (EBCDIC) 
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or 
X'xx" 



OY 
or 
ON 



enclosed in 
apostrophes , 



X'xx* X is entered and 
followed by the 
hexadeciiral fill 
character enclosed in 
apostrophes. 

O Identifies this as the 
output parameter. 



Indicates write disk 
check. 



This prcgrain is resident in the core 
image library in three phases: 

CLRDSK 

CLRD2 

CLRD3 



Control Statement Stream 

A sample control statement input stream for 
running a clear disk program from the core 
image library follows; device and extent 
descriptions are peculiar to the job being 
run. 



E=(e) 



E= 



(e) 



END Statement 



Indicates do not write 
disk check. 

Indicates this is the 
device type description 
parameter. 

For output devices, the 
valid entries are 2311 
and 2314. This entry 
must be enclosed in 
parentheses. 



This must be the last control statement. 
The statement is entered: 



//bEND 

Entry 

//b 



Reason 

These entries identify this as a 
control statement. 



END This entry indicates that this is 
the last control statement. 



//bJOBbEXAMPLE 

//bASSGNbSYS012,X' 191' 

//bDLBLbUOUT, ' DISKbLABEL ' , 67/3 00 

//bEXTENTbSYS 012 , 001221, 1, 0, 00310, 00630 

//DEXECbCLRDSK 

//bUCLbB=(K=38 ,D=480) ,X' 55' , CN 

//bEND 

/g 

Note: When clearing cylinder 200 of a disk 
pack to be used by the System/360 Model 30 
or Model 40 Emulator (program numbers 
EU484, EU485), or by the System/370 
Emulators of 1401, 1440, 146C, and 
1410/7010 programs (program number EU490), 
you should include immediately before the 
EXEC card in the control statement stream 
an UPSI card of the following format: 

//bUPSIbOOOOOOOl 

This card will cause cylinder 200 to be 
cleared along with the area specified on 
the EXTENT card. Cylinder 200 should not 
be specified on the EXTENT card. If only 
part of the pack is to be cleared and not 
cylinder 200, do not include this UPSI 
card. 
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Copy and Restore Disk or Data Cell 



Disk operating system volurres or files may 
be transferred fron disk to cards, disk, or 
tape, or from data cell to tape by means of 
these programs. Data can be restored to a 
disk pack or data cell at a later date. 
Applicable devices can be the IBM 2311, 
2314, or 2321; however, the same device 
type must be used when restoring data. 
This transfer processes all fields (that 
is, data portion of RO and count, key, and 
data portions of records Rl through Rn) 
necessary to restore the data so that it is 
identical to the original volume or file. 
The output created by the copy programs, 
except copy disk to disk, is designed for 
restore program use only. The copy and 
restore programs are: 

• Copy disk to card and restore card to 
disk. 

• Copy disk or data cell to tape and 
restore tape to a device of the 
original type. 

• Copy disk to disk. 



Record 
Size (in 
£:^i^® bytes) 



Problerr Size of 
Program Checkpoint 
Area Record 



2311 Up to 3625 lOK 

2314/ Up to 6400 lOK 
2319 

2311 Up to 3625 12K 

2314/ Up to 7294 12K 
2319 

2314/ Up to 7294 18K 
2319 

2321 Up to 2000 lOK 



7,400 bytes 
10,100 bytes 

11,100 bytes 
11,100 bytes 

18,400 bytes 

7, 900 bytes 



If checkpoints are written on disk, refer 
to "Checkpoints on Disk" in the DOS 
Sup ervis or and I/ O M ac r os publication 
listed in the preface of this publication 
for further information. 

Before a checkpoint is taken during the 
copy disk to card prograu, this iressage is 
printed: 



CHECKPOINT AND RESTART FACILITY 

The copy and restore programs provide 
checkpoint and restart facilities through 
the DOS system. (Refer to the DOS S ystem 
C ontr ol an d Se rvice publication listed on 
the front cover of this publication.) 



Checkpoint information may be taken at 
the beginning of every 80th track or at the 
beginning of each new extent. This 
information must be written on a disk or 
tape separate from the input and/or output 
device for the particular job. SYS003 is 
the programmer unit for assigning the 
checkpoint file. If SYS003 is not assigned 
to a tape, disk, or data cell, the 
checkpoint facility will be ignored. 



CHECKPOINT BEING TAKEN FCLLO\^ING CARD NO. 
xxxxxx 

The DOS system then prints a message 
identifying the checkpoint number. All 
cards following the card referenced in the 
first message should be deleted before 
attempting to restart. Similarly, if 
restoring from card to disk when the 
checkpoint is taken, all cards following 
the card referenced in the first message 
should be reloaded in the card reader. 

The filename associated with the 
checkpoint file is UCHKPT. This filename 
is to be used in the TLBL and DLEL cards 
whenever standard labels are to be 
processed, it must also be used in the 
RSTRT card when the checkpoints are on 
disk. 



Note: When checkpoints are not desired, 
you must ensure that SYS003 is unassigned 
by using job control card: 

//bASSGNbSYS003, UA 



Copy Disk ox Data Cell Programs 

The copy programs can transfer data from 
disk to card, disk, or tape, or from data 
cell to tape in either a copy volume or 
copy file. 



The size of the checkpoint records taken 
depends on the record size specified in the 
A parameter of the utility modifier card, 
and the amount of main storage available. 



The copy volume function transfers data 
from one disk pack to cards, disk, or tape, 
cr from one data cell to tape. The 
programmer unit is SYS004. The complete 
volum:e is transferred, including the two 
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IPL records, the volume label(s), and the 
VTOC. 

The copy file function transfers one 
data file from disk to cards, disk, or 
tape, or from data cell to tape. You irust 
supply the DLBL and EXTENT cards to 
describe the file to be copied. The extent 
limits should match the corresponding 
extents in the VTOC (rather than the 
extents specified in creating the file, in 
the event that not all of the specified 
extents are needed) . If the supplied 
extent limits do not match the 
corresponding extents in the VTOC, the file 
described by the job control statements 
>7ill be copied without an error indication. 
The file is transferred to the same extent 
limits as it was copied froir. The extent 
limits specified in the EXTENT-cards 
following the UOUT statement are checked 
for unexpired files. The copy file 
function can also be used for a 
multiple-extent sequential disk file on 
more than one pack if you ensure that each 
extent is assigned. 

If either copy function is used, the 
count fields may not be duplicated on any 
track, and the volume must be initialized 
according to IBM standard (i.e., standard 
home address, RO, volume label (s), etc.). 
See "Initialize Disk" or "Initialize Data 
Cell." Consecutive, indexed-sequential, 
and direct access method file organizations 
are supported by this group of programs. 



I/O AREA 

I/O overlap may be possible if sufficient 
storage is available to process two or more 
complete tracks at one time and as channel 
assignments permit. 

Note for Model 30; When tape and disk 
have been assigned to different kinds of 
channels (i.e. multiplexor and selector 
channels) , it is necessary tc assign one 
input/output area by using the O parameter. 
This prevents tape overrun errors. 



cell can be copied by the copy file 
function if an UPSI job control card is 
supplied. User standard labels are copied 
only if ycu assign the value 1 tc bit 7 cf 
the UPSI byte. Bits and 2 have 
significance only for tape label processing 
(see "Opening the Tape Volume" below) . All 
ether bits of the UPSI byte have no 
significance to the copy disk or data cell 
prograirs. If no UPSI card is supplied, it 
is assumed that there are no user standard 
labels present or that these present are 
not to be copied and restored. When a file 
that was copied with a // UPSI OCOOOOOl 
card in the job stream is subsequently 
restored, you must reset bit 7 to 1 (on) to 
ensure that the restore extents are 
identical to the copy extents. 



OPENING THE TAPE VOLUME 

Tape files containing either no labels or 
IBM standard labels can be processed. 
Nonstandard labels are net supported by the 
copy/restore programs. When any label 
processing is to be perfcrired, the UPSI job 
control card must set bits and 2 as 
follows -(0 equals off, 1 equals en): 

Bit Off = standard input-label checking. 
On = no input-label checking. 



5it 2 Off 



On 



standard output-label 

checking. 

no output-label checking, 



If standard label checking is desired: 

1. An UPSI card is optional (the 
copy/restore prograirs assume standard 
label checking) . 

2. A TLBL card is required. 

If no label checking is desired: 

1. An UPSI card is required. 

2. A TLBL card is not required. 



OPENING A DISK PACK OR DATA CELL 



Standard label checking is performed by 
using the system OPEN for the copy file 
function. For the copy-disk-to-disk 
program, refer to "Opening a Disk Pack or 
Data Cell for Restoring a File". For 
information about the output file, refer tc 
"Opening a Disk Pack or Data Cell for 
Restoring a Volume. " 



PROCESSING USER STANDARD LABELS ON DASD 
FILES 

User standard labels on consecutive and 
direct address files on a disk pack or data 



UTILITY MODIFIER STATEMENT 

This statement must be supplied to the copy 
program for program operation. The 
parameters are free form in that they can 
be punched in any order. The entries and 
description of the utility modifier 
statement are: 

//bUCRbTt,A=(a) ,CELLS= (n , n , n ,n ,n) ,N=(n) , 
Ox,IPL,E=(e) ,Mx 



Entry 
//hU 



Reason 

These entries identify this as 
a utility modifier statement. 



98 DOS and TOS Utility Programs 



CRb 



Tt 



A=(a) 



CELLS= 



(n,n,n,n,n) 



N=(n) 



Ox 



01 
02 



These entries are the initials 
of the program. 



These entries identify the 
type of function: 

TF= copy file 
TV= copy volume. 

These entries indicate the 
most common physical record 
length of the area to be 
copied. A d i ffo ^^flc e b e t w € - @n. 
thislenqth- (a) and t he actual 

^^cord length, can decrease!,^ 
per for m a noS'. TjEnperfcrnrance 

"Ts not ~ciTr~±!nportant factor, 
any valid record length will 
apply. 

These entries identify the 
parameter. The CELLS 
parameter is used for only 
those operations involving 
data cells. 

Here each n is a decimal digit 
from 0-9 designating a cell 
number. From one to five cell 
numbers can be included in 
this parameter. The order in 
which the cell numbers are 
included in this parameter is 
the order in which the cells 
will be processed by the 
program. 

These entries are reguired for 
the copy file function (if n 
is greater than 1) to indicate 
the number of volumes for the 
file. n must net exceed ten 
(decimal) . This parameter is 
optional for the copy volume 
function. If used, n must 
equal one; if not used, n is 
assumed to be equal to one. 

is the I/O area parameter. 
This parameter can only be 
used for the disk/data cell to 
tape program. 

When this parameter is 
omitted, or 02 is specified, 
the program determines the I/O 
area assignments. When 
sufficient storage is 
available, two I/O areas are 
assigned to provide for I/O 
overlap. 

When 01 is specified, the 
program assigns one I/O area, 
regardless of available 
storage. No overlap in the 
input/output operations 



IPL 



E=(e) 




occurs. Refer to the note for 
Model 30 under "I/O Area." 

This parameter is optional for 
the copy file function, but 
invalid for the copy volume 
function. If present, the IPL 
records are copied and 
restored. 

This is the device type 
description parameter- The 
valid entries for the letter e 
are 2311, 2314 (used for both 
the 2314 and 2319), and 2321. 
This entry miust be enclosed in 
parentheses. If this entry is 
omitted, the assumed value is 
2311. 

For copy volume, the device type 
is generated from the physical 
unit block (PUB) table. In that 
case, the E=(e) parameter is 
ignored. 

M is the file management 
parameter. This parameter is 
used only for the copy file 
function. 

MS indicates sequential file 
management. This is the 
assumed value if this 
parameter is omitted. 

MD indicates direct access 
file management. 

MI indicates indexed- 
sequential file management. 
All extent limits must then be 
specified for the entire 
indexed-sequential file (i.e. 
master index, cylinder index, 
and overflow areas) . 



INPUT PROCESSING 

The following should be considered to 
determine program efficiency for any data 
file. The program determines: 

1. The number of physical records that 
can be read into main storage at a 
time. This is determined from the 
specified A parameter and the 
available I/O area. 

2. The number of times that chaining of 
records may be performed per track. 

The program reads physical records 
(chained) as determined in step 1. When 
chaining can no longer be performed on the 
remainder of a track (as determined in 
step 2), the program reads one physical 
record at a time until all records have 
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been read from the track. 



program. 



If a record overflow condition occurs, 
control is given to the tasic routine 
(always in main storage) that reads one 
record per revolution until all records 
have been read from the track. Chaining 
will again be used on the next track. 

If a record is read that exceeds the 
available I/O area, the size of the actual 
record is retained so that when restoring 
the record, the record maintains its 
original format. When restoring, the 
section of the record that could net be 
read is then replaced with binary zeros. A 
message will identify this ccnditicn during 
the copy program. 

Performance may be reduced when tracks 
are not filled to maximum capacity. This 
may occur, for example, when the direct 
access method of file organization is used. 

Vihen using the copy disk or data cell tc 
tape program, each tape reel will be 
rewound and unloaded when processing is 
complete for that tape. 



Restore Disk or Data Cell Programs 

The restore programs have the ability to 
restore data from cards or tape to disk, or 
from tape to data cell (depending en the 
method used in the corresponding copy 
program) in either restore volume cr 
restore file. 



The restore 
one volume of 
disk pack, or 
The IPL record 
are automatica 
data. Both re 
fields in the 
exclusively un 
alternate trac 



volume function transfers 
data from tape or cards to a 
from tape to a data cell, 
s, volume label (s), and VTOC 
lly restored along with the 
store programs modify these 
format U label that are 
ique to the volume (that is, 
k information) . 



The restore file function completes the 
transfer of data so that the restored file 
is identical in location and format to the 
file at the time the copy function was 
performed. 

Before running the restore program, "ihe 
applicable disk pack or data cell must be 
initialized according to IBM standards 
(i.e., standard home address, RO, volume 
label(s), etc.). See "Initialize Disk" or 
"Initialize Data Cell," whichever is 
applicable. 

Specific parameters unique to the 
program are not needed because the output 
created by the copy programs contains all 
the utility control information necessary 
to execute the corresponding restore 



The disk or data cell output processing 
is dependent upon the processing performed 
in the corresponding copy program; i.e., 
when restoring, a partition of greater 
capacity will not improve performance. 



I/O AREA 

The exact I/O area assignment made in the 
corresponding copy program will te assigned 
for restoring. 



OPENING A DISK PACK OR DATA CELL FOR 
RESTORING A FILE 

The restore programs perform standard label 
checking by using the system OPEN. You 
must supply the DLBL and EXTENT cards to be 
used to create the label for the file that 
is to be restored. The extent limits must 
te the same as the limits supplied to the 
copy program. 

If user standard label processing was 
indicated when copying, tit 7 of the UPSI 
byte must again be set to 1 when restoring 
the file. 



When more than one data c 
to be processed, the program 
each volume as specified in 
parameter of the copy utilit 
statement. When opening, an 
assigned cell has been proce 
additional volumes are requi 
program will return to the f 
in the CELLS parameter. The 
repeated as often as necessa 
the file. 



ell volume is 
will accept 

the CELLS 

y modifier 

d the last 

ssed but 

red, the 

irst cell given 
cycle will be 

ry to complete 



OPENING A DISK PACK OR DATA CELL FOR 
RESTORING A V0LUN3E 

The system opens a disk pack or data cell 
as a sequential file by means of the 
restore program (see the Supervisor and I/O 
Macros publications listed in the preface 
of this publication) . The DLBL and EXTENT 
information are used to determine the area 
cf the volume to be searched for unexpired 
labels. This information must indicate a 
sequential file. The filename on the DLBL 
card must be UOUT. The extent provided 
through jot control for a restore volume 
should be as large as possible but must not 
include track zero on cylinder zero, or the 
VTOC. An unexpired file that overlaps this 
extent may be deleted only by choice. 

The new VTOC is automatically restored 
from tape to data cell, or from tape or 
cards to disk. The program also modifies 
the following fields, which are dependent 
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upon the physical volume: 

• Forirat 4 label, field 5 (highest 
alternate track) is irodified to reflect 
the highest alternate track assigned 

on the volume. 

• Format 4 label, field 6 (number of 
alternate tracks) is modified to 
reflect the number of alternate tracks 
available on this volume. 

If user standard label processing was 
indicated when copying, bit 7 of the UPSI 
byte must again be set to 1 when restoring 
the file. 

OPENING THE TAPE VOLUME (S) 

Tape files containing either no labels or 
IBM standard labels can be processed. 
Nonstandard labels are not supported by the 
copy/restore programs. When any label 
processing is to be performed, the UPSI job 
control card must set bits 0, 2, and 7 as 
follows (0 equals off, 1 equals on): 

Bit Off = standard input-label checking. 
On = no input- label checking. 

Bit 2 Off = standard output-label 
checking. 
On = no output-label checking. 

Bit 7 Off = user standard labels. 

On = restoring user standard labels 
(valid for tape file from copy 
disk or data cell program 
only) . 

If standard label checking is desired: 

1. An UPSI card is optional (the 
copy/restore programs assume standard 
label checking) . 

2. A TLBL card is required. 

If no label checking is desired: 

1. An UPSI card is required. 

2. A TLBL card is not required. 

If label processing is performed when 
copying onto the tape, label processing 
must be performed when restoring. 

CLOSING THE TAPE VOLUME (S) 

Each tape reel is rewound and unloaded when 
processing is complete for that tape. When 
an alternate tape drive is assigned, the 
program will alternate between the primary 
drive and the alternate drive until 
processing is complete for the program. 
The restore program will request the 
operator to decide at the end of each 
unlabeled tape whether the tape is at the 
end of file or volume. 



Control Statement Stream 

A sample control statement input stream for 
running a copy disk to tape program (copy 
volume function) from the core image 
library follows; device and file 
descriptions are peculiar to the job being 
run. 

//bJOBbEXAMPLE 
//bASSGNbSYS004,X'191' 
//bASSGNbSYS005,X'180' 
//bASSGNbSYS003,UA (checkpoints not 

desired) 
//bUPSIbOOlOOOOl (copy user standard 

labels) 
//bEXECbCRDT 
//bUCRbTV,A=(1600) 
/g 

To restore this same volume from tape to 
disk, use the following job stream: 

//bJOBbEXAMPLE 
//bASSGNbS YS 4 , X ' 1 8 ' 
//bASSGNbSYS00 5,X' 191' 
//bASSGNbSYS003,UA (checkpoints not 

desired) 
//bDLBLbUOUT 

//bEXTENTbSYSOOS, mill, 1, 0, COOIC, 01990 
//bUPSIblOOOOOOl (restore user standard 

labels) 
//bEXECbCRTD 
/g 

To run a copy disk to card (copy file 
function) program, use the following job 
stream: 

//bJOBbEXAMPLE 
//bASSGNbSYS005,X'191' 
//bASSGNbSYS006,X' 00D» 
//bASSGNbSYS003,UA (checkpoints not 

desired) 
//bDLBLbUIN, 'DISKbFILE' ,67/100 
//bEXTENTbSYSOOS, mill, 1,0, 00011, 00050 
//bEXECbCRDC 
//bUCRbTF , A= ( 1 6 0) 
/£ 

To run a copy disk to disk program with 
indexed sequential files (copy file 
function), use the following input stream: 

//bJOBbCOPY 
//bASSGNbSYS006,X' 191' 
//bASSGNbSYS005,X'19 2' 
//bASSGNbSYSOOS, UA 

//bDLBLbUIN, 'INDEXED SEQUENTIAL' ,, ISE (for 
copying) 

//bEXTENTbSYSOOS, 333 33 3, 4, 1,10, 2 (cylinder 
index) 

//bEXTENTbSYSOOS, 333333, 1,2, 20, 30 (prim.e 

data area) 
//bEXTENTbSYSOOS, 333 333, 2, 3, 12, 8 (overflow 

area) 

//bDLBLbUOUT, 'INDEXED SEQUENTIAL' ,, ISC (for 
restoring) 
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//bEXTENTbSYSO 05 ,222222,4,1,10,2 

//bEXTENTbSYSOOS, 222222, 1,2, 20, 30 

//bEXTENTbSYS005,222222,2,3,12,8 

//bEXECbCRDD 

//bUCRbTF,A=(800) ,MI 

/g 

To run a copy disk to disk program (copy 
voluir^e function), use the following stream: 

//bJOBbEXAMPLE 
//bASSGNbSYS004,X'191' 
//bASSGNbSYS005,X'192' 
//bASSGNbSYS003,UA (checkpoints not 

desired) 
//bDLBLbUOUT 

£ y i^TTi-wmtT'-KTm'U, o VC 

/ / iJXJAXULS J-AJ^ J-i- 

//bEXECbCRDD 



n nnni n. ni 990 



//bUCRbTV,A=(1600) 
/& 



To run a copy data cell to tape program 
(copy voluire function) , use the following 
job stream: 

//bJOBbCOPY 

//bASSGNbSYS003,X' 283* 

//bTLBLbUCHKPT 

//bASSGNbSYS004,X'293' 

//bASSGNbSYS005,X' 282' 

//bTLBLbUOUT 

//bUPSIblOlOO 

//bEXECbCRDT 

//bUCRbTV,E-(2 321) ,A=(80) ,CELLS=(5) 

/£ 
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Initialize Data Cell 



The initialize data cell prcgrair prepares 
from one to five cells for use on an lEM 
2321 Data Cell Drive. The preparation of 
each of these data cells consists of: 

• VTOC label checking 

• Home address generation 

• Track descriptor (RO) generation 

• Surface analysis and initialization 
verification 

• Volume label creation 

• IPL and VTOC format creation. 



Surface Analysis and Initialization 
Verification 

Surface analysis is performed first in the 
alternate track area. When a track in the 
alternate area is found to be defective, 
the track is flagged defective and cannot 
be assigned as an alternate track. Surface 
analysis is then performed on all the 
remaining tracks on the cell. If a track 
is detected that has a defective surface 
area upon which data cannot be written, an 
alternate track is established. Messages 
are printed on SYSLOG to notify you of 
defective tracks, assigned alternate 
tracks, and their locations. A cell is 
deleted frcm further processing vihen no 
more alternate tracks are available for 
assignment. 



VTOC Label Checking 



Before a cell is initialized, a check is 
performed to see if a volume table of 
contents (VTOC) is present. If the cell 
has been previously initialized and the 
VTOC is present, any labels in the VTOC are 
checked to see if the files en the data 
cell have expired. If any files have not 
expired, a message is printed. If the 
operator still wishes to bypass the 
condition, that cell may be deleted frcm 
the job. 



Volume Label Creation 



Using a control card unique to this 
program, a volume label is created in the 
standard format (VOLl) for each cell 
processed. The volume label is written on 
subcell 0, strip 0, cylinder 0, track 0, 
and record 3 of each cell. Seven 
additional user volume labels (VOL2-VOL8) 
can be created, if desired, and will be 
placed in records four through ten. 



Home Address Generation 

A binary, five-byte home address is written 
on every track by this program. The five 
bytes written are: flag, subcell number, 
strip niomber, cylinder number, and track 
number. 



IPL and VTOC Format Creation 

IPL FORMAT CREATION 

This program formats two IPL records. 
These records are written on subcell 0, 
strip 0, cylinder 0, track 0, records one 
and two. Record one is written with a 
24-byte data field of binary zeros. Record 
two is written with a 144-byte data field 
of binary zeros. 



Track Descriptor (RO) Generation 

The track descriptor record is the first 
record following the home address. This 
record consists of an 8-byte count portion 
and an 8-byte data portion. 

If an error occurs in the home address 
or RO area, the track is flagged defective, 
and an alternate track is assigned by 
advancing the home address and RO records 
by 800 bytes. If an error occurs at this 
time, the program is terminated. 



VTOC FORMAT CREATION 

The initialize data cell program preformats 
the VTOC. The location en the cell in 
which the VTOC is to be placed is indicated 
in a contrcl card. The standard location 
of the VTOC is on subcell 0, strip 0, 
cylinder 0, immediately following the 
volume labels and extending to the end of 
the cylinder. However, the VTOC can appear 
anywhere on the cell (except for the 
alternate track area), but cannot exceed 
cylinder boundaries. 
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Utility Modifier Statement 



This statement must be provided for program 
operation. The format and entries for the 
utility modifier staterrent for this program 
are: 

//bUIMbCELLS=(n,n,n,n,n) , Ix 



E ntr y 
//bU^ 



1Mb 



CELLS= 



(n, n, n, n, n) 



Ix 



IR 
lA 



Reason 

These entries identify this as 

a utility modifier statement. 

These entries identify the 
initialize data cell program. 
The entries can optionally be 
omitted ^ 

This entry identifies the 
parameter. 

Each n is a decimal digit 
(from to 9) designating a 
cell. From one (n) to five 
(n,n,n,n,n) cells can be 
specified in this parameter. 

IR indicates that previously 
flagged tracks are to retain 
their flags. If the Ix entry 
is omitted, IR is assumed. 

lA indicates that the surfaces 
of all tracks are to be 
analyzed, ignoring any 
previous flags. 



location. If processing other 
than a standard OPEN on the VTOC, 
the VTOC should be generated in a 
location other than the standard 
location. (Protleir programs are 
not permitted tc access subcell 0, 
strip 0, cylinder 0, track 0.) 

//bVTOCtSTRTADR=(cccchhh) ,EXTENT=(n) 



Entry 
//bVTOCb 

STRT_ADR= 
(cccchhh) 



EXTENT^^ 



Reason 

Identifies this card as a 
VTOC control card. 

Indicates that this 
paraireter contains the 
beginning address of the 
VTOC . 

Indicates the beginning 
address, where: 

c =cell (0-9) 

c c =subcell (00-19) 

c =strip (0-9) 

h =cylinder (0-4) 

h h =track (00-19) 

This parameter must be 
punched within the 
parentheses. 

Indicates this parameter 
contains the nuirber of 
tracks in the VTOC. 



Label Control Set 

Three types of label control cards, called 
a label control set, must be supplied: 

• VTOC control card 

• Volume label card 

• END card. 



(n) 



Indicates the number of 
tracks (frcm 1 to 20) in 
the VTOC. This parameter 
must be punched within 
the parentheses. 
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VTOC CONTROL CARD 

The VTOC control card provides the control 
information necessary for the creation of 
the VTOC. The card is punched in either 
standard (first example) or nonstandard 
(second example) format: 



//bVTOCbSTANDARD 



E ntry 



Reason 



//bVTOCb Identifies this card as a VTOC 
control card. 

STANDARD Indicates that the VTOC is to be 
generated in the standard 



Contains information tc create volume 
labels. A VOLl control card must be 
supplied for each cell. Up to seven 
additional volume label control cards (V0L2 
through VOLS) for user volume labels can be 
supplied for each cell. The V0L2 through 
VOLS cards must be sequentially entered. 

The VOLn label consists of the following 
fields: 

col. 1- 3 Label identifier. Must contain 
VOL to indicate that it is a 
volume label. 

col. U Vol ume_ la be l_r uir b e r . Indicates 

the relative position (1-8) of a 

volume label within a group of 
volume labels. 
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col, 



b-10 Volume serial number. 



An 



col 



identification code assigned to 
a volume when it enters an 
installation. Normally a 
numeric field from 000001 
through 999999. Any or all of 
the six bytes may be alphameric, 

H ^ol ™§_§sc ur i t Y . Indicates the 
security status of the volume. 



col. 12-21 Data file di rectory. The first 
five bytes contain the starting 
address of the VTOC, the last 
five bytes are blank. Used for 
DASD only. 

col. 22-41 Reserved. 

col. 42-51 Owne r na me a nd add r ess code . 

Indicates a specific customer, 
installation, and/or system. 
Used by the vrOC Display 
program. 

col. 52-80 Reserved. 

For more information on the VOLn label, 
see the publication DOS D ata Manag ement 
Concepts. GC24-3427. 

Columns 5 through 10 are used as the 
volume serial number. It is recorrirended 
that you always specify six characters in 
the volume label control card. If less 
than six characters are specified, however, 
the utility prograii pads the field to the 
right with blanks (X'40'). You must always 
ensure that all six characters are 
specified in job control extent information 
since the job control program pads an 
incomplete serial number to the left with 



zeros. Therefore, do not use // EXTENT if 
the serial number includes any blanks; 
otherwise, the rest of the inforiration on 
the card is ignored and default values are 
assurred. Instead, use the VOL, DLAB, and 
XTENT statements whenever referencing a 
pack where blanks occur in the volume 
serial number. The // XTENT card enables 
you to specify the six-character voluire 
serial number within quotes. 



END CARD 

The last label control set must be followed 
by an END card having the following format: 

//bEND 



Control Statement Stream 

A sample control statement input stream 
for running an initialize data cell program 
follows: 

//bJOBblNIT 

//tASSGNbSYSOOO,X' 293' 

//bEXECblNTM 

//bUIMbCELLS= (3,5,7) 

//bVTOCbSTRTADR= (3033303) ,EXTENT={ 5) 

VOL1222222 

//bEND 

//bVTOCbSTANDARD 

VOL1333333 

//bEND 

//bVTOCbSTANDARD 

VOLm44U44 

//bEND 

/g 



Initialize Data Cell 105 



Initialize Disk 



The initialize disk program prepares one 
complete disk pack for use on the IBM 2311 
Disk Storage Drive, the IBM 2314 Direct 
Access Storage Facility, or the IBM 2319 
Disk Storage. The preparation cf a pack 
consists of: 

• VTOC label checking. 

• Home address generation. 

• Surface analysis and track descriptor 
record (RO) generation. 

• Volume label creation. 

• IPL and vroc format creation. 

This program can also be used to change 
the volume label (s) and VTOC address of a 
previously initialized disk pack (ether 
than an emulator pack). Specifying IS in 
the input option parameter cf the utility 
modifier statement will cause surface 
analysis, HA and RO generation to be 
bypassed. A workpack used for OS can 
therefore be converted into a workpack 
suitable for DOS. 

Note: If you want to use a 2314 pack as a 
2311 pack, you must first initialize the 
2314 as a 2314 and then initialize it as a 
2311, because of end-of-cylinder 
conditions . 



VTCK; Label Checking 

Before a pack is initialized, it is checked 
to see if any labels present in the VTOC 
have expired. If the file has not expired, 
a message is printed. If you still wish to 
initialize the disk pack after receiving 
the message, you can ignore the label and 
continue to process; otherwise, the job is 
terminated. 



Home Address Generation 

The home address is written by this program 
as follows: a flag (one byte) , the 
cylinder number (two bytes) , and the head 
number (two bytes). The flag byte is 
transmitted to the flag byte of each record 
on the track and indicates the condition of 
the track. Bits 0-5 are written as zero. 
Bit 6 is written as a zero if it is a good 
track or a one if it is a defective track. 
Bit 7 is written as a zero if it is not an 
alternate track and a one if it is an 
alternate track. 



If the home address cannot be written on 
a track, the processing performed depends 
upon the device used: 

!• IBM 2311: A message is printed to 
identify the home address. 

2. IBM_231 4 / 2 3 1 9 : The gap between the 
index marker and hoire address is 
extended by 705 bytes and an attempt 
is made to write the home address 
following the extended gap. If the 
home address cannct be written this 
time, a message is printed to identify 
the home address. 

If no home address can be written on a 
pack, the job is cancelled. 



Surface Analysis and Track Descriptor 
Record (RO) Generation 

Surface analysis is performed once on every 
track that is not already flagged 
defective. The utility modifier statement 
you supply may specify (1) surface analysis 
of all tracks including those already 
flagged defective, (2) tracks to be flagged 
defective without surface analysis, and (3) 
the number of times per track surface 
analysis is to be performed. 

Surface analysis is performed first on 
the alternate tracks (cylinders 200-202) 
and then en the remaining tracks. Tracks 
found to te defective are flagged 
defective. The program flags a track 
defective by setting bit 6 of the flag byte 
in the home address to 1. 

Alternate tracks are assigned to all 
defective tracks except defective alternate 
tracks (defective alternate tracks are net 
assigned) . The program assigns an 
alternate track by writing (1) the 
alternate track's address in the track 
descriptor record of the defective track 
and (2) the defective track's address in 
the track descriptor record cf the 
alternate track. 

Processing is terminated when a 
defective track is found and no more 
alternate tracks are available. The 
defective tracks are logged to provide a 
record of the condition cf each pack 
processed. When analysis has shown that a 
track is net defective, the track 
descriptor record (RO) is written. The 
track descriptor record is the first record 
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that follows the home address and is 
divided into two parts, count and data. 

An eight-byte count field is written as 
folloiA?s: the cyliader number (two bytes), 
the head number (two bytes) , the record 
number (one byte), the key length (one 
byte), and the data length (two bytes). 
The eight-byte data field is written with 
the cylinder number (two bytes) , the head 
number (two bytes), the record number which 
is zero (one byte) , the number of bytes 
remaining on the track (two bytes) , and 
binary zeros (one byte) . 

If the track descriptor record cannot be 
written on a track, the processing 
performed depends upon the device used: 

1. IBM_2311: A message is printed to 
identify the error. 

2- IB M 2314/2319: The gap between the 
index marker and home address is 
extended by 705 bytes and an attempt 
is made to write the home address and 
track descriptor record again. If 
either cannot be written, the 
appropriate message is printed to 
identify the error. 

The program continues analysis and track 
descriptor record generation to log any 
other defective tracks. A track descriptor 
record error results in job cancellation. 



Volume Label Creation 

Through the use of a control card unique to 
this program, a volume label is created in 
the standard format (VOLl) for each pack 
processed. The volume label is written on 
cylinder 0, track 0, record 3 of the disk 
pack. Seven additional user volume labels 
(VOL2-VOL8) can be created, if desired, and 
placed in records 4-10. 



IPL and VTOC Creation 

IPL FORMAT CREATION 

This program formats two IPL records. 
These records are written on cylinder zero, 
track zero, records one and two. Record 
one is written with a 24-byte data field of 
binary zeros. Record two is written with a 
lU4-byte data field of binary zeros. 

VTOC FORMAT CREATION 

The initialize disk program preformats the 
VTOC (volume table of contents). The 
location on the disk in which the VTOC is 
to be placed is indicated in a control 



card. A VTOC starting in the standard 
location and not extending tc the end cf 
cylinder is therefore not possible. If a 
VTOC is required on cylinder not 
extending the entire cylinder, it can be 
achieved by starting on track 1 (or track 
n). 

The standard location cf the VTOC is on 
cylinder zero immediately following the 
volume label (s) and extending to the end of 
the cylinder. However, the VTOC can appear 
on any cylinder (excluding alternate 
cylinders) but cannot exceed cylinder 
boundaries. A VTOC placed anywhere other 
than in the standard location can be any 
number of tracks desired on the cylinder. 
The first record begins in the first record 
of the first track, and the last record 
appears as the last record of the last 
track specified. 

Each record of the VTOC contains a 
44-byte key field and a 96-byte data field 
written as binary zeros. The first two 
records of the VTOC are reserved for two 
specific records. The first record is the 
format 4 label of the data set control 
block of the volume table of contents 
(VTOC-DSCE) . The second record is for the 
space-management label (format 5). 

The first four bytes cf the key field cf 
the space-management label are written as a 
hexadecimal five (05). The first byte of 
the data field is written in hexadecimal 
representation F5. 



Utility Modifier Statement 

This statement, if used for this program, 
is read and diagnostics are performed. If 
this statement is omitted from the program, 
the following parameters are assumed: 

//bUbIR,Cl 

Note: The default Cl is ignored if IS is 
specified. 

The format and entries for the utility 
modifier statement for this program are: 

//bUIDbIx,Cn,R=(cccchhh) 

Figure 25 shows detailed information of 
the entries in the utility modifier 
statement for the initialize disk program. 

IStry Reason 

//bU These entries identify this as a 
utility modifier statement. 

IDb The initials of the program. These 
initials can be omitted. 
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PARAMETER 


POSSIBLE 
FORMS 


ENTRIES 


EXPLANATION 


Input 

Option 

Ix 


IR 
lA 
IS 


I 
R 

A 
S 


The first letter in this form identifies 
this as the input option parameter. 

Previously flagged tracks are to retain 

their flags. 

IR should be specified to avoid 

intermittent errors that may result when 

the pack is mounted on a different disk 

drive or when the circuitry is warming up. 

If the Ix parameter is emitted, IR is 

assumed. 

The surface of all tracks is to be 

analyzed, ignoring any previous flags. 

Surface analysis, home address (HA) and 
RO generation will be skipped. For 
initialized work packs this entry can be 
used to change the volume label (s) and 
VTOC address and/or to convert a workpack 
used for OS into a workpack suitable for 
DOS. When the program does not find a 
VOLl l^bel or a Format 4 label, the pro- 
gram will cancel the job. (The pack is 
thus assumed not to be initialized.) 
The S entry in this input option parameter 
cannot be used for an emulator pack. 


Count 

Option 

Cn 


Cn 


C 
n 


The first letter in this form identifies 
this as the count option parameter. 

A decimal value of 1 to 255 should be 
entered, indicating the number of times 
surface analysis is to be performed. 
Enlarging this parameter causes a propor- 
tional increase in program run time. 


Replace 
Option 


R= (cccchhh) 


R= 
(cccchhh) 


This letter and symbol indicate this is the 
replace option parameter. This parameter is 
ignored if IS is specified. 

This entry indicates the physical 
location of a track that is to be uncon- 
ditionally flagged as defective (cccc 
denotes the cylinder number and hhh 
denotes the head number) . These numbers 
must be enclosed in parentheses. The 
replace option may be repeated any number 
of times up to the total number of 
alternate tracks available. The method 
of repeating this option is as follows: 
R= (cccchhh) ,R= (cccchhh) ,R= (cccchhh) . 
This option may be continued on additional 
cards by using the standard method for 
continuation cards, i.e., a character 
other than a blank is punched in column 
72 and the continuation card is started 
in column 16 . Note that each card must 
contain a full R-parameter. 



Figure 25. Initialize Disk Utility Modifier Statement 
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Label Control Set 

Three types of label control cards, called 
a label control set, must be supplied: 

• VTOC control card 

• Volume label control card 

• END card. 



VTOC CONTROL CARD 

The VTOC control card provides the control 
information necessary for the creation of 
the VTOC. The card is punched in either 
standard (first example) or other than 
standard (second example) format: 

//bVTOCbSTANDARD 
5Si£Z Reason 

//bVTDCb Identifies the card as a VTOC 
control card. 

STANDARD Indicates that the VTOC is 
generated in the standard 
location. If processing other 
than a standard OPEN on the 
VTOC, the VTOC should be 
generated in a location other 
than the standard location. 
(Problem programs are not 
permitted to access cylinder 0, 
track 0.) 



supplied when user volume labels are 
desired. The V0L2 through VOLS cards must 
be entered in sequence. 

The VOLn label consists of the following 
fields: 

col. 1-3 Label Identifier. (Must contain 
VOL to indicate that it is a 
volume label) 

" 4 Volume Label Number. (Indicates 
the relative position (1-3) of a 
volume label within a group of 
volume labels) 
5-10 Volume Serial Number. (An 

identification code assigned to 
a volume when it enters an 
installation. Normally a 
numeric field OOOCOl to 999999. 
However, any or all of the six 
bytes may be alphameric) 

" 11 Volume Security. (Indicates 

security status of the volume) 

" 12-21 Data File Directory. (The first 
five bytes contain the starting 
address (cchhr) of the VTOC, the 
last 5 bytes are blank. Used 
for DASD only) 
22-41 Reserved. 

" 42-51 Owner Name and Address Code. 

(Indicates a specific customer, 
installation and/cr system. 
Used by the VTOC Display 
program . ) 
52-80 Reserved. 



//bVTOCbSTRTADR=(cccchhh) ,EXTENT={n) 



Entry 
//bVTOCb 



STRTADR= 



(cccchhh) 



EXTENT = 



Reason 

Identifies the card as a VTOC 

control card. 

Indicates this parameter 
contains the beginning address 
of the VTOC. 

Indicates the beginning address 
(the cylinder and head numbers) 
and must be punched in decimal 
format within parentheses. 

Indicates this parameter 
contains the number of tracks in 
the VTOC. 

Indicates the number of tracks 
in the VTOC and must be punched 
in decimal format within 
parentheses . 



VOLUME LABEL CONTROL CARD 

The volume label control card contains the 
information for the creation of the volume 
label. A VOLl volume label control card 
must De supplied. The V0L2 through VOLS 
control cards for user volume labels can be 



(n) 



For more information on the VOLn label see 
the SRL publication DOS_Data_Management 
Concepts . 

The first six columns after "VOLn" are 
used as the volume serial number. It is 
recommended that you always specify six 
characters in the volume label control 
card. If less than six characters are 
specified, however, the utility program 
pads the field to the right with blanks 
(X'40'). You must always ensure that all 
six characters are specified in the job 
control extent information since the job 
control program pads an incomplete serial 
number to the left with zeros. Therefore, 
do not use // EXTENT if the serial number 
includes any blanks; otherwise, the rest of 
the information on the card is ignored and 
default values are assumed. Instead, use 
the VOL, DLAB, and XTENT statements 
whenever referencing a pack where blanks 
occur in the volume serial number. The 
// XTENT card enables you to specify the 
six-character volume serial number within 
quotes. 



END CARD 

An END card must follow the last card of 
the label control set: 
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//bEND 



Control Statement Stream 

A sample control statement input stream for 
running an initialize disk program from the 
core image library follows; device and file 
descriptions are peculiar to the job being 
run. 



Note: When initializing a pack to be used 
ty the System/360 Model 30 or Model 40 
Emulator (program numbers EU484, EU485) , or 
by the System/370 Emulators of lUOl, 1440, 
1460, and 1410/7010 programs (program 
number EU490) , you must include immediately 
before the EXEC card in the control 
statement stream an UPSI card of the 
following format: 



//bJOBbEX?^MPLE 

//bASSGNbSYS000,X'191' 

//bEXECblNTD 

//bUIDbIR,Cl,R=(0027003) 

//bVTOCbSTANDARD 

VOLlllllll 

//bEND 

/& 



//bUPSIbOOOOCOOl 



This card will allow cylinder 200 to be 
used for Model 30 or Model 40 Emulator data 
instead of beinc Dart of the alternate 
track area. 
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Initialize Tape 



In order to perform standard label checking 
on tapes, standard voluitie labels rrust be 
present. The initialize tape program 
prepares up to eight volume labels, one 
dumiry header label (HDRl followed by binary 
zeros) , and a tape mark for each tape 
submitted. No checking of the labels is 
performed after preparation. This program 
may be used to initialize either EBCDIC 
tapes with IBM standard volume labels or 
ASCII tapes with American National Standard 
Institute (ANSI) standard volume labels. 

For EBCDIC tapes up to eight volume 
labels can be written per tape; for ASCII 
tapes,, only one volume label can be written 
(ASCII tapes do not use VOL2-VOL8) . The 
format of both standard volume labels is 
found in the DOS Data Man agement C on c epts 
publication. There are two options for 
creating volume labels on tape: 



1. 



A single control card may be used to 
provide the starting volume serial 
number, the owner name and address 
identification, and the protection 
code. This information will be written 
on the first tape supplied. The same 
volume label will be written on each 
succeeding tape supplied with the job, 
except that the volume serial number 
will be incremented by one. 



2. 



Unique volume labels may 
each tape by using a vol 
card. Up to eight volum 
cards may be supplied fo 
only one volume label im 
supplied for ASCII tapes 
the exact image of the 8 
label. This option shcu 
the volume serial number 
any alphameric values. 



be written on 
ume label image 
e label image 
r EBCDIC tapes ; 
age card may be 
This card is 
character 
Id be used when 

field contains 



In addition to the volume label (s) , this 
program will prepare a dummy header label 
immediately followed by a tape mark. As 
each tape is initialized, its volume 
label (s) and the tape unit number are 
printed on SYSIOG. This completes the 
initialization for one tape. The tape may 
then be either rewound or rewound and 
unloaded as specified by the user. 

Tape units miust be assigned in ascending 
sequence starting with SYSOOO. After the 
last unit has been assigned, the next 
sequential programmer logical unit should 
be unassigned (or assigned to a unit other 
than a tape drive) to insure proper 
termination. This avoids unintentional 
initialization. 



If there are additional tape units on 
line (maximum is 16) , the tape on the next 
higher unit (SYSOOl, SYS002, etc.) will be 
initialized. If there are no more 
additional units, one of the following 
actions will be taken: 

1. The job is terminated if the rewind 
option was specified. 

2. If the rewind option was not specified, 
the program waits until a new tape is 
mounted on the first output unit 
(SYSOOO) at which time tape 
initialization will begin a new cycle 
of the output units. 

If the program reads the last card from 
the reader before completing a cycle of 
assigned units, the tape on the current 
unit is completed and the job is 
terminated. 



Job Control Cards 

Upon initial program loading, symbolic 
names, channel addresses and tape 
characteristics for the initialize tape 
program must be defined through job control 
cards. These items once defined cannot be 
changed during the running of the program. 
If the required units for the program are 
not defined, the program will be 
terminated. 

The following job control cards are used 
for system assignment: 



JOB card 
ASSGN cards 

SYSLOG 

SYSOOO 



Required. 



Required as follows (if 
not permanently assigned) : 
Must be assigned for 
output messages. 
Must be assigned as first 
output tape unit. 
SYS001-SYS015 Optional. May be assigned 
as additional output tape 
units . 



LOG card 
NOLOG card 
EXEC card 



Optional. 
Optional. 
Required. 



Utility Control Statements 

utility assignment for the initialize tape 
program is made by utility control 
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statements. The control statements and 
their associated positional parameters are 
as follows: 

// INTT C?\KD,KJiWiND,A,SERlAL= (xxxxxx) , 
P= (x) , CODE= (xxxxxxxxxxxxxx) 

Note: The parameters must be punched in 
the relative order above. 



P=(x) 



//fc 



(Required.) Indicates control 
statement. 



INTTb (Required.) Identifies an 

initialize tape control statement. 

CARD (Optional.) This parameter 

indicates that the card image 
option is desired. If this option 
is specified, volume label image 
cards (only one card used for ASCII 
tapes) must be supplied. If this 
parameter is omitted, it is assumed 
that volume information for every 
tape initialized is to be taken 
from this control statement. 

REMIND (Optional.) This parameter 

indicates that each tape is to be 
rewound at the completion cf 
initialization. If this parameter 
is omitted, it is assumed that the 
tapes are to be rewound and 
unloaded at the completion of 
initialization. 

A (Optional.) This parameter 

indicates that all tape labels are 
to be recorded in the ASCII mode 
and will observe the ANSI 
standards. If this parameter is 
omitted, EBCDIC mode and IBM 
standards will be assumed. 

Note: If an optional parameter is not 
used, do not insert a comn\a for the 
omittec. parameter. For example: 



// INTT CARD, REWIND, SERIAL= (xxxxxx) , 
CODE= (xxxxxxxxxxxxxx) 



2§£;^_I.2!3.3§_QEtion_Not_Sgecif ied 

The following parameters are examined if 
the card imiage option is net specified: 



SERIAL" (xxxxxx) 



(Required 
six-chara 
field rep 
starting 
volume se 
This numb 
increment 
each addi 
initializ 
first. 



.) This is a 
cter numeric 
resenting the 
value for 
rial number, 
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ed after the 



(Optional.) Fo 
tape, this para 
indicates that 
volume security 
of all volumes 
given the speci 
protection valu 
value of 1 indi 
protection. If 
parameter is om 
each volume wil 
given a value o 
indicating no 
protection. 



r EBCDIC 

meter 

the 

fields 
are to be 
fied 
e. A 
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this 
itted, 
1 be 
f zero. 



CODE=(xxx xxx) 



For ASCII tape, this 
parameter indicates that 
the accessibility fields 
of all volumes are to be 
given the specified 
protection value. A 
value of 1 indicates no 
accessibility. If this 
parameter is omitted, a 
space will be written, 
indicating unlimited 
accessibility. 



(Required.) For EBCDIC 
tape, this is a ten 
character alphameric 
value representing the 
owner's name and address 
code. For ASCII tape, 
this is a fourteen 
character value. 



Card Image Option Specified 

If the card image option is specified, the 
following control cards are required: 



!• With EBCDIC tapes; from on6 to eight 
volume label image cards. These cards 
are an exact image of the 80-character 
label. They must be in ascending 
sequence (VOLl, V0L2, V0L3. . . etc . ) . 

With ASCII tapes; one volume label 
image card. This card is an exact 
image cf the 80-character label. This 
card must contain VOLl in the first 
four columns. 

2. // END — This card is used to separate 
the volume label image cards for 
different tapes. When this card is 
read, the program stops reading cards 
from the card reader until it finishes 
initializing the tape on the current 
output unit. If eight volume label 
image cards are supplied for a given 
EBCDIC tape, the // END card may be 
emitted. 



:os ut 



■T'OOT' RTV ^ 



The VOLn label consists of the following 
fields: 



col. 1- 3 Label iden tifi er. Must contain 
VOL to indicate that it is a 
volume label. 

col. 4 Vol ume la bel n umbe r. Indicates 
the relative position (1-8) of a 
volume label within a group of 
volume labels. 

col. 5-10 Volume serial number. An 

identification code assigned to 
a volume when it enters an 
installation. Normally a 
numeric field from 000001 
through 999999. Any or all of 
the six bytes may be alphameric. 

col. 11 Volu me s ecurity. Indicates the 
security status of the volurre. 

col. 12-21 Data fil e dire c tor y. The first 
five bytes contain the starting 
address of the VTOC, the last 
five bytes are blank. Used for 
DASD only. 

col. 22-41 Reserved. 



col. 42-51 Owner name and address_code. 

Indicates a specific customer, 
installation, and/or system. 
Used by the VTOC Display 
program. 

col. 52-80 Reserved. 

For more information on the VOLn label, 
see the publication DOS D a ta Management 
C on cepts, GC24-3427. 

Columns 5 through 10 are used for the 
volume serial number. It is recomrrended 
that you always specify six characters. If 
ycu specify less than six characters, the 
program pads the fields to the right with 
blanks (X'40'). Always ensure that all six 
characters are specified in the job control 
extent information, since the job control 
program pads an incomplete serial number to 
the left with zeros. Therefore, do not use 
// EXTENT if the serial number contains any 
blanks. Otherwise, the remainder of the 
information in the card is ignored and 
default values are assumed. Instead, use 
the VOL, DLAB, and EXTENT statements 
whenever blanks occur in the volume serial 
number. You can use the // EXTENT card to 
specify the six-character volume serial 
number within apostrophes. 
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Control Statement Stzeam 

Two sarrple control statement input streams 
for running an initialize tape program from 
the core im.age library follow; device and 
file descriptions are peculiar to the job 
being run. In each example SYSLOG is 
assumed to be permanently assigned. This 
example initializes an ASCII tape without 
using the card image option. 



// JOB EXAMPLE 

// ASSGN SYS000,X'181' 

// ASSGN SYS001,UA 

// EXEC INTT 

// INTT REWIND, A, SERIAI={ 000001) , 

P={1),C0DE=(AB COMPANY NYC) 
/g 



This example initializes an ASCII tape using the card image option. 



// JOB EXAMPLE 
// ASSGN SYS000,X'181' 
// ASSGN SYS001,X'182' 
// ASSGN SYS002,UA 

// EXEC INTT (column 80) 

// INTT CARD, A i 

VOLl 000001 AB COMPANY NYC 1 

// END 

VOL1000002 AB COMPANY NYC 1 

// END 

/£ 
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Tape Compare 



The tape compare program can be entered 
either in the core image or relocatable 
library. It compares two files frcm two or 
more tapes to ensure that the files are 
identical. The number of reels in each of 
the files need not be equal. Unlike the 
other utility programs described in this 
publication, the tape compare program 
requires 24K bytes of irain storage. 

The program does not perform tape 
positioning; therefore, the tapes are 
assumed to be positioned at the beginning 
of the run. If prepositioning of the tape 
is necessary before the corrpare operation, 
you may position the tapes by specifying 
that the tapes are unlabeled and by using 
the magnetic tape command (MTC) as found in 
the Sys tem Control and Se rvic e publication 
listed on the front cover of this 
publication. 

Tapes containing fixed, variable, or 
undefined record lengths may be compared. 
When the tape compare program is initiated, 
it will normally run to completion 
regardless of the number of unequal 
compares that may occur. Unless a user 
exit has been specified for an unequal 
compare, any physical records that do not 
match will be written on SYSLST along with 
an index of the byte(s) that do not match, 
and the physical record number. No editing 
is performed on unprintable characters. If 
the exit has been specified, the tape 
compare program yields control through that 
exit. 

Input areas are assigned from a common 
area of storage. The number of areas 
assigned to each file depends on the 
maximum size of the physical input records. 
If the space is available, two input areas 
are assigned; otherwise, one input area is 
assigned to each file. 

If the tape files to be compared extend 
over more than one reel, the additional 
reels are also compared. If two tape 
drives are assigned for each file, the 
program can alternate between the two: for 
example, primary, alternate, primary, etc. 
In this case, tape reels are net rewound 
and unloaded. If only primary tape drives 
are assigned (and there are multiple reels 
per file) , the operation waits for a new 
tape reel to be mounted on the primary tape 
drive. 

The compare operation may be terminated 
at any time by pressing the external 
interrupt key. A compare operation for a 



new file can be initiated by supplying the 
correct control statement and following the 
restart procedures. This applies only when 
SYSIPT is assigned as a card reader. The 
program will automatically be terminated 
upon detection of the /* or /S control 
statement. The next job in SYSRDR will 
then be run. 



Restart Procedures 

A restart procedure is available which 
allows you to control the program when the 
external interrupt feature is incorporated 
in the supervisor. The restart procedure 
is: 

• Press the interrupt key, a message is 
printed, and the compare in process 
will be interrupted. 

• Continue the current compare, start a 
new compare, or terminate the job by 
responding to the message with the 
appropriate character. 

Any other information concerning the 
messages can be found in the appendix of 
this manual or the DOS Messages publication 
listed in the Preface. 



Label Processing 



All volume labels are skipped without 
comparing. The first header and the first 
trailer file labels are checked to ensure 
that the file names are identical. 
Additional header, trailer, and user labels 
are bypassed. If the file names are not 
identical, both labels are printed. 

When an end-of-volume (EOV) trailer 
label is sensed, the following action is 
taken: 

• If the number of reels specified has 
not been processed, the compare 
continues on the next reel for the 
associated file- 

• If the number of reels specified has 
been processed, the job will be 
terminated. 

When an end-of-file (EOF) trailer label 
is sensed, the compare is terminated and 
you are given the option to restart or 
terminate the job. 
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Nonstandard or Unlabeled Files 

For nonstandard labels, if the first record 
from the tape is a tapemark, the tapennark 
is ignored. If a tape mark follows the 
nonstandard label, the reel count in the 
utility modifier statement must be a one; 
otherwise the data immediately following 
the label will not be compared. For every 
nonstandard label (with the following 
tapemark) detected for this file, the 
operator must supply another utility 
modifier statement with a reel count of one 
and restart the operation. Other tapemarks 
will be assumed to indicate an 
end-of -volume condition except when the 
reel count has been depleted, in which case 
the condition is assumed as an end-of- file 
condition. In any case, a compare 
operation may be restarted by supplying the 
correct control card and following the 
restart procedures. 

For unlabeled files tapemarks will be 
assumed to indicate an end-of- volume 
condition except when the first record read 
from the tape is a tapemark, in which case 
the tapemark is ignored. An end-of-file 
condition is assumed when a tapemark has 
been detected and the reel count has been 
depleted. In any case, a compare operation 
may be restarted by supplying the correct 
card and following the restart procedures. 



Job Control Statements 

Upon initial program loading job ccntrcl 
statements define the symbolic names, 
channel addresses, and tape characteristics 
for the tape compare program. These items, 
once defined, cannot be changed during the 
running of the program. If the required 
units for the program are not defined, the 
program will be terminated. 

The following job control statements are 
used for system assignment: 

JOB card Required. 

ASSGN cards Required as fellows: 

SYSLOG 



Must be assigned for 
diagnostic messages. 



SYSLST Must be assigned for writing 
records that do not match 
(printer or tape) . 

SYSIPT Must be assigned for reading 
tape compare control 
statements (reader or tape) . 

SYSOOU Must be assigned as the 

primary and alternate tape 
units for one of the tape 
files to be compared. This 



tape file will be referred to 
as file A. 

SYS005 Must be assigned as the 

primary and alternate tape 
unit for the other file to be 
compared. This tape file will 
be referred to as file B. 



Linkage Editor 

The program! can be entered into either the 
relocatable or the core image library. If 
the program is in the relocatable library, 
the link edit phase must be performied. 

The control statement stream used when 
executing a program that is resident in the 
relocatable library without a user exit 
routine is: 

//bJOB 

//bASSGN 

//bOPTIONbLINK 

bPHASEbTPCP , * , NOAUTO 

bINCLUDEblJWTCP 

bINCLUDEblJJCPO (for TOS) 

bINCLUDEblJJCPDO (for DOS) 

bINCLUDEblJWXIT 

bINCLUDEblJWTPCP 

bELNTRY 

//bEXECbLNKEDT 

//bEXEC 

//bTPCP . . . 



/& 



The control statement stream used when 
executing a program that is resident in the 
relocatable library with a user exit 
routine is : 

//bJOB 

//bASSGN 

//bOPTIONblINK 

bPHASEbTPCP , * , NOAUTO 

bINCLUDEblJWTCP 

bINCLUDEblJJCPO (for TOS) 

bINCLUDEblJJCPDO (for DOS) 

bINCLUDE (If the operand is omitted from 
this statement, the text of the user 
routine must be present on SYSIPT and 
followed by /* control statement. If 
the routine is in the relocatable 
library, it must have a user-assigned 
module name unique to the system as the 
operand. ) 

bINCLUDEblJWTPCP 

bENTRY 

//bEXECbLNKEDT 

//bEXEC 

//bTPCP . . . 



/& 
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The control statement stream used when 
executing a program that is in the core 
image library is: 

//bJOB 
//bASSGN 
Z/bEXECbTPCP 
//bTPCP 



/6 



Utility Contsol Statement 

utility assignirent for the tape compare 
program is made by a utility control 
statement. Only one statement is used and 
it is read in by the mainline phase of the 
program. The control statement and its 
associated parameters are: 

//bTPCPbRECSIZ= (m) , LABELS, REELS= (n) , ALTA, 

ALTB,EXIT 



Entry 

//b 

(required) 

TPCFb 
(required) 



RECSIZ 
(required) 



= Crr) 

(required) 



LABELS 
(optional) 



REELS 
(optional) 



= (n) 

(optional) 



Reason 

Indicates a control statement, 



Identifies the tape compare 
control statement. 



Identifies the record size 
parameter. 



Maximum physical record size 
in bytes (that is, not logical 
record size). It must be 
enclosed in parentheses. This 
is needed for the assignment 
of input areas. If any 
physical input record exceeds 
this maximum, the excess is 
truncated and net compared. 



Indicates the tapes are 
labeled according to IBM 
System/360 standards. If this 
parameter is emitted, the 
tapes are assumed to be either 
unlabeled or not labeled 
according to IBM System/360 
standards. In the latter 
case, the labels are treated 
as data. 



Identifies reel count 
parameter to follcvi. 



Specifies the maximum number 
of reels per file to be 

compared. It must be enclosed 



ALTA 
(optional) 



ALTB 
(optional) 



EXIT 
(optional) 



in parentheses. If this 
parameter is omitted, n=l v^ill 
be assumed, n set to zero is 
an error. (Maximum value of n 
is 255.) If the tape file 
extends over more than one 
reel, this parameter m-ust be 
used to cause the additional 
reels to be compared. 



Indicates an alternate unit 
for tape file A. If this 
entry is omitted, it is 
assumed that there is only a 
primary unit for tape file A. 



Indicates an alternate unit 
for tape file B. If this 
entry is omitted, it is 
assumed that there is only a 
primary unit for tape file B. 



Indicates that you wish the 
tape compare program to branch 
to a routine that you supply 
when an unequal compare is 
detected. If this entry is 
omitted, no branch will be 
made and unequal compare 
records are written. 



User Exit Routine 

If ycu supply an exit routine, the storage 
required for the routine is taken from the 
input area. If the exit routine is 
specified, the mainline phase branches 
through general register 2 to the location 
IJWXITl (defined as an entry point in the 
user's exit routine) when an unequal 
compare is sensed. Return to the tape 
compare program is through general register 
14. 

You have access to all physical and 
logical IOCS macro instructions to perform 
input/output, etc. The locations of the 
records that do not compare equally are 
supplied by general registers. 

During user-exit routine processing 
program flew is: 

1. Obtain the address of the file A 
description parameter list from 
register 0. 

2. Obtain the address of the file B 
description parameter list from 
register 1. 

3- Obtain the number of the mismatched 
record from register 10. 



50S 
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4. Perform user processing. 

5. Return control to the tape coiripare 
program through register 14 
(containing the return address) . 

FileR Description Paramet er List 
(Register 0) 

The address of an eight byte parameter 
list is found in register 0. The first 
four bytes of the list contain the address 
of the file A input area; the second fcur 
bytes contain the length of the physical 
record. 

File B Description Para meter L ist 
(Regist er 1 ) 

The address of an eight byte parameter 
list is found in register 1. The first 
four bytes of the list contain the address 
of the file B input area; the second fcur 
bytes contain the length of the physical 
record. 



Control Statement Stream 

Two sample control statement input streams 
for running from the disk resident core 
image and relocatable libraries follow; 
device and file descriptions are peculiar 
to the jobs being run. 



Core Image Libra ry 

//bJOBbEXAMPLE 

//bASSGNbSYS004,X'181' 

//bASSGNbSYS00 5,X'18 2' 

//bASSGNbSYS005,X'18 3' ,ALT 

Z/bEXECbTPCP 

//bTPCPbRECSIZ=(300) ,REELS=(2) ,ALTB 

/S 

R el ocatab le L ib rar y 

//bJOBbEXAMPLE 

//bASSGNbSYSLNK,X'18 0' 

//bASSGNbSYS001,X'181* 

//bOPTIONbLINK 

bPHASEbTPCP , * , NOAUTO 

bINCLUDEblJWTCP 

bINCLUDEblJJCPDO 

bINCLUDEblJWXIT 

tINCLUDEblJWTPCP 

bENTRY 

Z/bEXECbLNKEDT 

//bASSGNbSYS004,X' 183' 

//bASSGNbSYS005,X'184' 

//bPAUSEbbOPERATORbPLACEbTAPEbAbCNbDRIVEb 

183bANDtTAPEbBbONbDRIVEbl84 
//bPAUSEbbRESTARTbJ0BbBYbREPLYINGb2bT0bE0Fb 

MESSAGES 
//bEXEC 

//bTPCPbRECSIZ=( 2000) 
//bTPCPbRECSIZ= (2000 ) 
//bTPCPbRECSIZ=( 2000) 
//bTPCPbRECSIZ=(2000) 
/& 
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VTOC Display 



The VTOC program displays the labels 
contained in the volume table of contents 
of a disk pack on an IBM 2311 Disk Storage 
Drive, an IBM 2314 Direct Access Storage 
Facility, an IBM 2319 Disk Storage, or of a 
data cell on an IBM 2321 Data Cell Drive. 
The function of this display is to enable 
you to easily keep track of your files and 
their extents. The prograrr provides for 
output to a printer, tape file, or disk 
pack. 

The labels are identified by their 
location ^rithin the VTOC and their format 
types. All major fields are displayed 
along with appropriate heading lines. 

The VOLn label consists of the following 
fields : 

col. 1-3 Label Identifier. (Must contain 
VOL to indicate that it is a 
volume label) 

" 4 Volume Label Number. (Indicates 
the relative position (1-3) of a 
volume label within a group of 
volume labels) 

" 5-10 Volume Serial Number. (An 

identification code assigned to 
a volume when it enters an 
installation. Normally a 
numeric field 000001 to 999999. 
However, any or all cf the six 
bytes may be alphameric) 

" 11 Volume Security. (Indicates 

security status of the volume) 
12-21 Data File Directory. (The first 
five bytes contain the starting 
address (cchhr) of the VTOC, the 
last 5 bytes are blank. Used 
for DASD only) 
22-41 Reserved. 

" 42-51 Owner Name and Address Code. 

(Indicates a specific customer, 
installation and/or system. 
Used by the VTOC Display 
program. ) 
52-80 Reserved. 

For more information on the VOLn label see 
the DOS Data Management Concepts 
publication listed in the Preface. 

The first time a label of a data secured 
file is encountered, the message 8V96D 
FORMAT 1 LABEL OF DATA SECURED FILE is 
issued to the operator. The programmer 
instructs the operator to reply YES if the 
label information of all data secured files 
is to be included in the output listing. A 
data secured file is identified in the 
listing by the letters DSF directly 



following the format identification. 
Replying NC to the message causes the 
printing cf label information for data 
secured files to be suppressed. 



LINKAGE EDIT PROCEDURE 

If the program is not already in the core 
image library, it must be link edited. 
Separate modules are supplied for link 
editing the VTOC display program with 
either a tatch-only or a multiprogramming 
supervisor. The resultant multiprogramming 
supervisor program is self-relocating and 
may be executed in any partition. 

With a tatch-only supervisor, the 
following job stream should be used to link 
edit and catalog this program: 



//bJOBbBATCH 
//bOPTIONbCATAL 



User-defined job name. 

Causes the program to be 
cataloged in the core 
image library. 



bINCLUDEblJWLVB Used with a batch-only 

supervisor. This module 
is non-self-relocating. 



Z/bLBLTYPbTAPE 



Z/bEXECbLNKEDT 



With a multipr 
following job 
edit, catalog, 
For self-reloc 
reserved for 1 
time, rather t 
Therefore, any 
example must i 
statement for 



Required if tape label 
processing is to be 
performed. 

Executes the linkage edit 
program . 

Defines the end of job. 

ogramming supervisor, the 
stream must be used to link 

and execute this program, 
ating programs, storage is 
abel processing at execution 
han at link-edit time. 

LBLTYP statement for this 
mmediately precede the EXEC 
the program. 



//bJOBbMULTI 

//fcOPTIONfcCATAL 

bINCLUDEblJWLVM 



Z/bEXECbLNKEDT 
Z/tLBLTYPtTAPE 



Z/bEXECbLISTVTOC 
/S 



Used with a 
multiprogramming 
supervisor. This module 
is self-relocating. 

Required if tape label 
processing is to be 
performed . 
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CONTROL CARDS 

No Utility modifier card is needed for this 
program. h sample control statement input 
stream for running a VTOC display program 
from the core image library follows; device 
descriptions in the example are peculiar to 
the job being run. If there are any data 
secured files described in the VTOC, the 
operator will receive message 8V96D. The 
PAUSE card shown in this example indicates 
that such information should not be 
included in the printed output. 



//bPAUSE REPLY NO IF MSG 8V9 6D IS ISSUED 
//bEXECbLISTVTOC 



Assignment of output allows you to assign 
SYS005 to a printer, tape, or disk. When 
SYS005 is a disk, DLBL and EXTENT 
descriptions peculiar to the device are 
required. When SYS005 is a tape, TLBL 
descriptions are required (standard labeled 
tape also requires LBLTYP statement if 
multiprogramming supervisor) . 



//bJOBbEXAMPLE 
//bASSGNbSYS004, X' 191 ' 
//bASSGNbSYS005,X'00E' 



(input on disk) 
(output on printer) 
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Appendix A. Module Contents 



File to File Utility Programs 



Common AAsdules 



Assign Alternate Track-Disk Modules 



IJJCPO (for TOSK- IJJCPDO (for DOS) 
Text for Phase 1 , Part 2 



IJWGEN 
Text for Phase 2 



IJWLAB 
Text for Phase 5 



Unique Program Modules 



IJWxx 
PHASE xxxx, * , NOAUTO 

INCLUDE IJWxxl 

INCLUDE IJJCPO (for TOS); 
INCLUDE IJJCPDO (for DOS) 

PHASE xxxx 2,*, NO AUTO 

INCLUDE IJWGEN 

I IJWGENP2 
PHASE xxxx 3, . 



> , NOAUTO 



' xxxx 2 ' 

(IJWGENP2 is for printer output) 
INCLUDE IJWxx 3 
PHASE xxxx4,xxxx 3, NOAUTO 
INCLUDE IJWxx 4 



IJWxxl 
Text for Phase 1 , Part 1 



IJWxx 3 
Text for Phase 3 



IJWxx 4 
Text for Phase 4 



IJJCPD1N 
Text for Phase 1 , Part 1 



IJWADl 
Text for Phase 1 , Part 2 



!JwAn2 
Text for Phase 2 



IJWAD3 
Text for Phase 3 



IJWAD4 
Text for Phase 4 



IJWAD5 
Text for Phase 5 



IJWAD 
PHASE ATAD, *, NOAUTO 
INCLUDE UJCP01 N 
INCLUDE IJWADl 

PHASE ATAD2, IJWADl PI, NOAUTO 
INCLUDE UWAD2 

PHASE ATAD3, IJWADl PI, NOAUTO 
INCLUDE UWAD3 

PHASE ATAD4, IJWADl PI, NOAUTO 
INCLUDE UWAD4 

PHASE ATAD5, IJWADIPI, NOAUTO 
INCLUDE IJWAD5 



Note: xxxx represents the phase names and xx the module identification. 
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Assign Alternate Track - Data Cell Modules 



IJJCPDIN 
Text for Phase 1, Part 1 



IJWAM1 
Text for Phase 1, Part 2 



IJWAM2 
Text for Phase 2 



IJWAM3 
Text for Phase 3 



IJWAM4 
Text for Phase 4 



IJWAM5 
Text for Phase 5 



IJWALTM 




PHASE ATAM. ', NOAUTO 




INCLUDE IJJCPDIN 




INCLUDE IJWAM 




PHASE ATAM2, IJWAM 1 PI, 


NOAUTO 


INCLUDE IJWAM2 




PHASE ATAM3, IJWAM 1 PI, 


NOAUTO 


INCLUDE IJWAM3 




PHASE ATAM4, IJWAM TP1, 


NOAUTO 


INCLUDE IJWAM4 




PHASE ATAM5, IJWAM 1 PI, 


NOAUTO 


INCLUDE IJWAM5 
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Cleor Disk ond Cleor Data Cell Module Contents 
Common Modules 





IJJCPDO 


Te 


xt for Phase 1 , Part 2 






IJWCLD2 




Text for Phase 2 






IJWCLD3 




Text for Phase 3 



Clear Disk Modules 



IJWCLD1 
Text for Phase 1 , Part 1 



IJWCLD 
PHASE CLRDSK,*,NOAUTO 
INCLUDE IJWCLD1 
INCLUDE IJJCPDO 
PHASE CLRD2,*,NOAUTO 
INCLUDE IJWCLD2 
PHASE CLRD3,CLRD2,NOAUTO 
INCLUDE IJWCLD3 



Clear Data Cell Modules 



IJWCLMl 
Text for Phase 1 , Part 1 



IJWCLM 
PHASE CLDC,*,NOAUTO 
INCLUDE IJWCLMl 
INCLUDE IJJCPDO 
PHASE CLDC2,*,NOAUTO 
INCLUDE IJWCLD2 
PHASE CLDC3,CLDC2,NOAUTO 
INCLUDE IJWCLD3 



VTOC Display (Batched DOS Supervisor) and 

VTOC Display (Multiprogramming Supervisor) Module Contents 

Common Modules 



IJWLVl 
Text for Phase 1 , Part 1 



IJJCPDON 
Text for Phase 1 , Part 2 



IJWLVT 
Transient Phase $$BLISTV 



VTOC Display (Batched DOS Supervisor) Modules 



IJWLVB 
PHASE LISTVTOC, *, NOAUTO 
INCLUDE UWLV1 
INCLUDE UJCPDON 
INCLUDE UWLVT 



VTOC Display (Multiprogramming Supervisor) Modules 



IJWLVM 
PHASE LISTVTOC, +0, NOAUTO 
INCLUDE UWLV1 
INCLUDE UJCPDON 
INCLUDE UWLVT 
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Common Module - Copy/Restore Programs 



Copy Disk AAodules 



IJJCPDl N 
Text for Phase 1 , Part 1 



Copy Disk to Card Modules 



IJWKCl 
Text for Phase 1 , Part 2 



IJWKC2 
Text for Phase 2 



IJWKC 
PHASE CRDC, *, NOAUTO 
INCLUDE IJJCPDl N 
INCLUDE IJWKCl 

PHASE CRDC2, IJWKCl OP, NOAUTO 
INCLUDE IJWKC2 



Copy Disk to Tape Modules 



IJWKTl 
Text for Phase 1 , Part 2 



IJWKT2 
Text for Phase 2 



IJWKT 
PHASE CRDT, *, NOAUTO 
INCLUDE IJJCPDl N 
INCLUDE IJWKTl 

PHASE CRDT2, IJWKTl OP, NOAUTO 
INCLUDE IJWKT2 



IJWRDl 
Text for Phase 1 , Part 2 



IJWRD2 
Text for Phase 2 



IJWRD 
PHASE CRDD, *, NOAUTO 
INCLUDE UJCPDIN 
INCLUDE IJWRDl 

PHASE CRDD2, IJWRDl OP, NOAUTO 
INCLUDE IJWRD2 



Restore Card to Disk Modules 



IJWRCl 
Text for Phase 1, Part 2 



IJWRC 
PHASE CRCD, *, NOAUTO 
INCLUDE IJJCPDl N 
INCLUDE IJWRCl 



Restore Tape to Disk Modules 



IJWRTl 
Text for Phase 1 , Part 2 



IJWRT 
PHASE CRTD, *, NOAUTO 
INCLUDE IJJCPDl N 
INCLUDE UWRTl 
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Initialize Disk A/kxiules 



IJJCPDIN 
Text for Phase 1 , Part I 



IJWIDl 
Text for Phase 1 , Part 2 



IJWID2 
Text for Phase 2 



IJWID3 
Text for Phase 3 



IJWID4 
Text for Phase 4 



IJWID 




PHASE IN ID, *, NOAUTO 


INCLUDE IJJCPDl N 




INCLUDE UWIDl 




PHASE INTD2, UWIDl PI, 


NOAUTO 


INCLUDE UWID2 




PHASE INTD3, IJWID2P2, 


NOAUTO 


INCLUDE UWID3 




PHASE INTD4, UWIDl PI, 


NOAUTO 


INCLUDE UWID4 





Tape Compare Module Contents 



IJJCPO (for TOS); IJJCPDO (for DOS) 
Text of Phase 1 , Part 2 



IJWXIT 

Text for Dummy User Routine (Phase 1, Part 3) 



IJWTCP 
Text for Phase 1 , Part 1 



\smcp2 

Text for Phase 2 



IJWTCP3 
Text for Phase 3 



IJWTPCP 
PHASE TPCP2,*, NOAUTO 
INCLUDE IJWTCP2 
PHASE TPCP3,TPCP2, NOAUTO 
INCLUDE 1JWTCP3 



Initialize Tape Module 



IJWIT 



PHASE INn 
INCLUDE IJWIT 



Initialize Data Cell Modules 



IJJCPDIN 
Text for Phase 1, Part 1 



IJWIM1 
Text for Phase 1, Part 2 



IJWtM2 
Text for Phase 2 



IJWtM3 
Text for Phase 3 



IJWiM4 
Text for Phase 4 



IJWIM 




PHASE INTM, *, NOAUTO 




INCLUDE IJJCPDIN 




INCLUDE IJWIIW1 




PHASE INTM2, IJWID1P1, 


NOAUTO 


INCLUDE IJWIM2 




PHASE INTM3, IJWIM2P2, 


NOAUTO 


INCLUDE IJWIM3 




PHASE IJWIM4, IJWID1P1, 


NOAUTO 


INCLUDE IJWIM4 
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Appendix B. Printer Output 



Note that the same data is used for both exairples, 



DATA LIST EXAMPLE 



TAPE TO PRINT UTILITY 

INPUT BLOCK LENGTH 00150 

OUTPUT BLOCK LENGTH 00132 

INPUT OPTION REMIND 

OUTPUT OPTION PRINT CHARACTER 

2 INPUT, 2 OUTPUT AREAS ASSIGNED 

RECORD FORMAT VARIABLE 

TYPE LIST 

STARTING RECORD NUMBER 00000001 

8001D IS IT EOF 

REPLY Y 

NUMBER OF INPUT BLOCKS PROCESSED 000017 

NUMBER OF OUTPUT BLOCKS PROCESSED 000020 

END OF JOB 



Job descriptive (logging) 

y messages as it appeared on 

symbolic device SYSLST. 



THIS IS A SAMPLE 

1 5ID000165100 
G 8AD275228A27 
£ 1AD685901A68 
' 2ED636222E63 

9ED3'*2279E3't 

) 8ID't21248I't2 

9AD811989A81 

5 3GD255753G25 

+ 7AD999977A99 

2 2ID598232I59 
K 9AD326429A32 
/ 6ID011'»76I01 

- 8GD17it538G17 
5 3GD150333G15 
E 5ED570315E57 

- 2ED259782E25 
2 0CD774700C77 
" 1CD018351C01 
. 'tCD7365i*'*C73 
/ 1CD056811C05 
END OF DATA 



OF TH 
016510 
5228A0 
5901A0 
6222E0 
2279E0 
124810 
19S9Aa 
5753G0 
9977A0 
823210 
6429A0 
1'*76I0 
't538G0 
0333G0 
0315E0 
9782E0 
4700C0 
8351C0 
6544C0 
6811C0 



E HEADI 
0000000 
0000275 
0000685 
0000636 
O0003't2 
0000421 
0000811 
0000255 
0000999 
0000598 
0000326 
0000011 
000017"* 
0000150 
0000570 
0000259 
000077"+ 
0000018 
0000736 
0000056 



NG INFORMATION LINE THAT MAY BE USED IF THE USER DESIRES. 

16500000 165 IDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 

22800 27 5228ADDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 

90 1086 8590 lADDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 

2 2 2886 362 22EDDDDDDDDDDDDDDDDDDD 

2 795 2 3't2 27 9EDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 
2l*8 304212'*8IDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 
98 92 0811989ADDDDDDDDDDDDDDDDD 
7538325575 3GDDDDDDDDDD 

97771999977ADDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 
23255598232 lUDDDDDDDD 

't29 3 9 326'*29ADDDDDDDDDDDDDDDDODDDDDDDDDDDDDDDDDDDDDDDD 

'i7 60 8011'»7 6IDDDDDODDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 
538701 7'*538GDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 

3 33'tll50 3 3 3GDDDDDDDDDDDD 

315765703 1 5EDDDDDDDDDDDDDDDDDDDDDDDDDDDD 

78 2't0 2 5978 2EDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 
7 006't7 747 00CDDDDDDDDD 
35172018 351CDDDDDDDDDDDDDDDDDDDD 

51i 1+427 365'«'tCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 
81142 56811 CDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 



DATA LIST WITH CHARACTER "^ 



> 



Printer output 
OS it appeared 
on symbolic 
device SYS005. 



y 
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UAIA UlbKLAY tXAMKLt 



TAPE TO PRINT UTILITY 
fuBiiT stOCK LENGTH 00 150 

6utput'block~length'66T20 

input option rewind 

output option print character 

2 input. 2 output areas assigned 

record format variable 

type data display 

starting record number 00000001 

8001d is it eof 

REPLY Y 

NUMBER OF INPUT BLOCKS PROCESSED 000017 
mjHBER OF OUTPUT BLOCKS PROCESSED 000017 
END OF JOB 



Job descriptive (logging) 

^ meaogei os it appeared on 

synibolic device SYSLST. 



THIS IS A SAMPLE OF THE 
BL SZ BL NO RC NO 



77 
75 
8i| 
Sd 
98 
SO 
62 
139 

5«» 

86 

101 

9«» 
126 



6S 

79 

101 



1 

2 

3 

<i 

5 

6 

7 

8 

9 

10 

11 

12 

1} 

m 

IS 

16 
17 
18 
19 
20 



HEADING INFORMATION LINE THAT MAY 
5 1 5 2 5 3 5... 

1 SID00016SI000165I0000000016SOO 
G 8AO27$228A27S228A00000 27 522800 
C 1AD68S901A685901A0000068590108 
' 2ED636222E636222E0000063622288 

9ED3'»2279E3'»2279E00000 3«»2 27952 

) 8ID<«212<t8l<«212^8I00000<)212'«830 

9AD811989A811989A0000081198920 

5 3eD255753G25S7S3G0000025575383 

7AD999977A999977A000009999777 19999 

2 210598232159823210000059823255 
K 9AD326<>29A326<«29A00000326i<2939 
/ 61 D011>«761 01 m76l 000000 ll'«7608 



- 8GD17<«538G17k5 
5 3GD150333G1503 

5ED570315E570315E0 

- 2E0259782E2597 
0CD77<«700C77't700C0 

' 1CD018351C0183 
. '•CD7365't'»C7365 
/ 1CD056811C0568 



38G000 
33G000 
000057 
82E0O0 
000077 
51C000 
^<tCOOO 
IICOOO 



0017'«53870 
00150333<tl 
0315755703 
00259782k0 
<t7006'»77'»7 
0001835172 
007365<»<»'»2 
000568Ui«2 



BE USED IF THE USER DESIRES. DATA DISPLAY WITH CHARACTER > 
.<♦ 5 5 5 6 5 7 5... 8 5 9 5 

0001651 DDDODDDDDDDDDDDDDDDDDDODDDDDDDDD 

2 7S228ADDODDDDDDDDDDDDDDDDDDDDDDDDDDD 

68 59Q1ADDDODDDDODDDDDDDDDODDOODDOODDDDDDDDDDD 

636222EDDDDDDDDDDD0DDDDDDD 

3<<2279EDODDDDDODOODDDDODDODDDDODDDDDDDDDDDDDDDDODDDDDDDDDDO 

<42 1 2<t8 I DDDDODDDDDDOODDDDODODDDDDDDDDDDDDD 

811 989ADDDDDDDDDODDODDDD 

255753GDDDDDDDDDD 

77ADDOODDDODDODDDDDDDDDDDDDDDDDDDDDD 

598232IDDDDODDDD 

326<«29ADDDDDDDDDDDDDDDDDDDDDDDDDUDD0DDD0DDDD0DD 

11 >t 7 6 1 DDDDDDDDDDDDDODDDDDDDODDDDDDDDDDDDODDDDDDDOODDDDDDDDDD 

1 7^ 5 38GDDDDDDDDDDODDDDDDDDDDDDDDDODDDDDDDDDDDDDDDDDDDDD 

15033 3GDDDDDDDDDDDD 

1 5EDDD0DD0DDDDDDDDDDDDD0DDDDDDD 

259782EDDDODDOODDDDDDDODDDDDDDDDDDOODDDDODDDDODDDDODODDD 

OOCDDDDDDDDD 

018 351CDDOODDDDDDDDDDDDDDDD 

7 3e5<«<«CDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 

568nCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDODDDDDDDDDDDODDDODDDDDDDD 



Mnter output 
> ot It oppeofM 
f on syn^lic 

device SYSOO& 



END OF DATA 



PACE IBL NO RC NO 5 1 5 2 5. 



126 DOS and TOS Utility Programs 



Appendix C. File^to— File Program Messages 



The following are file-to-file program messages that appear on the device (either a 
printer or a tape unit) assigned to SYSLST. The messages are divided into three groups: 

• Diagnostic messages 

• Processing messages 

• Information messages 

A job is terminated when a diagnostic message is received; the operator is informed of 
this condition on the SYSLCG device. when informational and processing messages are 
received, processing continues. 



RESPECTIVE ORDER OF DIAGNOSTIC MESSAGES FOR THE FILE-TO-FILE PROGRAMS 



Note; Whenever xxx precedes a message, it indicates in which field definition the 
error occurred, e.g. cards 1 and 2 each have 5 field definitions: for a format error 
in the third definition, xxx would be printed as 003; for a format error on the fifth 
definition of card 2, xxx would be printed as a cumulative 010. 



MESSAGE 



REASON 



ACTION 



END CARD MISSING 



X INVALID FORMAT, 
UTILITY MODIFIER 
CARD 



No END statement supplied (// END) ,or 
noncontrol statement read before END. 



Job is 
cancelled, 



Format specifications for utility modifier 
statement were not followed or all required 
parameters were not supplied as follows: 



Decoded message 



Error in input format specifications 

(A parameter) . 

Error in output format specifications 

(B parameter) . 

Error in device type specification 

(E parameter) . 

a. Invalid format. 

b. Not consistent with program type 
in utility modifier card. 

F: Error in record format specifications 

(F parameter) . 
I: Invalid input option (I parameter). 
J: Invalid type of job (J parameter). 
M: Missing required parameter (F,A,B 

parameters must be present) . 
N: Invalid type of program (U identifier 

// U not found, or xx representing the 

program type is not valid) . 
0: Invalid output option (0 parameter) . 
P: Invalid page number option 

(P parameter) . 

Q: Error in sequence checking specifications 

(Q parameter) . 
R: Error in starting record specifications 

(R parameter) . 
S: Invalid spacing option (S parameter). 
T: Type of job parameter missing 

(T parameter) . 
U: Undefined parameters (parameter 

identifier not valid) . 
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1 

MESSAGE 


REASON 


ACTION 


FIELD SELECT CARD 
MISSING 


Field select was indicated on utility 
modifier statement, but no field select 
statement was supplied. 


Job is 
cancelled. 


XXX INVALID FORMAT 
FIELD SELECT CARD 


Format specifications for field select 
statement were not followed. (000 
indicates no fields for field select 
were indicated but CV was present.) 


FIELD SELECT CARD 
NOT EXPECTED 


Field select was not indicated on 
utility modifier statement, but 
field select statement was su^^'^lied^ 


INVALID CONTROL 
CARD 


A control statement (with //b in the 
first 3 columns) was read which was 
not a utility modifier, field select, 
print header, or END statement. 


INVALID INPUT DEVICE 
AT SYS004 


The device assigned to SYS004 is not valid 
for this program. 


INVALID OUTPUT DEVICE 
AT SYS005 


The device assigned to SYS005 is not 
valid for this program. 


UNDEFINED FORMAT CAN 
ONLY DISPLAY 


Data display is the only mode that can 
be indicated for undefined records in 
printer output programs . 


XXX CANNOT FIELD 
SELECT INTO 1st 4 
CHARACTERS 


The indicated field cannot be selected 
into the record length field of a 
variable-length record. 


INVALID OUTPUT 
DEVICE AT SYS006 


The device assigned to SYS006 is not 
valid for this program. 


UNDEFINED FORMAT 
CAN ONLY COPY 


Copy is the only format that can be 
indicated for undefined records in non- 
printer program. 


INCORRECT PROGRAM 


Utility modifier statement punched with 
the wrong program initials, such as DT 
for a disk to card program. 


Job is cancelled. 
Note that all 
succeeding 
messages may not 
have a valid 
meaning. 


X INVALID FORMAT UTIL 
MOD CARD 


x: Utility modifier statement error 


Job is cancelled. 


A: For non DASD input, a key field 

was used. 
B: For nonprinter output, a printer 

B format was used; for non DASD 

output, a key field was used. 
K: For non-DASD input or output^ a 

key field was used. 


FIXED LENGTH RECORD 
FORMAT REQUIRED 


Card input or card output was not 
fixed length. 
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MESSAGE 


REASON 


ACTION 


INVALID JOB FOR THIS 
PROGRAM 


Program 


Valid 
Types 


Invalid 
Types 


Job is 
cancelled. 


Undefined records 


a . TP , DP and 

MP 


* 

D 


C,B,BF,F,L, 
LF,R,RF 




b. DD,DM,DT, 
MD,MM,MT, 
TD,TM, and 
TT 


C 


B,BF,D,F,L, 
LF,R,RF 




Fixed-length records without key fields 


a. CP 


B,BF,C,D, 
F,L,LF 


R,RF 




b. MP,TP, and 
DP 


* 

D,L,LF 


B,BF,C,F,R, 
RF 






c. CD,CT,DC, 
DD,DM,DT, 
MD,MM,MT, 
TC,TD,TM 
and TT 


C,F,R, 
RF 


B,BF,D,L,LF 




Fixed-length records with key fields 


a. CD, DC 


F 


B,BF,C,D,L, 
LF,R,RF 




b. DT,MT,TM, 
and TD 


F,RF 


B,BF,C,D,L, 
LF,R, 






C. DD,^1M,DM, 
and MD 


C,F 


B,BF,D,L,LF, 
R,RF 






d. DP and MP 


D,L,LF 


B,BF,C,F,R,RF 




Variable-length records without key fields 


a . MP , TP , and 
DP 


D,L,LF 


B , BF , C , F , R 
RF 




b. DD,DM,DT, 
MD,MM,MT, 
TD and TT 


C,F,R, 
RF 


B,BF,D,L,LF 






* If first character forms control is 
specified (S parameter), data display 
is invalid. 
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MESSAGE 


REASON 


ACTION 


INVALID INPUT RECORD 
LENGTH 


a. Card input. Record 
length was greater 
than 80 (EBCDIC) or 
160 (binary) . 

b. Tape input. Record 
length was greater 
than 8192. 

c. DASD input without 
key. Block length 
was not a multiple 
of the record length. 

d. DASD record length 
exceeds 3625 for 2311, 
7294 for 2314 and 2319, 
or 2000 for data cell. 


Job is 
cancelled. 

I 

1 


NONSTANDARD LABEL 
INVALID INPUT 


DASD programs do not allow nonstandard 
labels. 


NONSTANDARD LABEL 
INVALID OUTPUT 


INVALID INPUT OPTION 


Option is incorrect for the program. No 
option for DASD input. 


INVALID OUTPUT OPTION 


Option is incorrect for the program. 


INVALID CARD SEQUENCE 


Card programs. The length parameter 
specified is over 10 characters or 
the starting position plus the length 
exceeds 80 characters. 


I/O AREA CANNOT BE 
ASSIGNED 


Not enough main storage to assign the 
specified input/output areas. 


FIELD SELECT MUST BE 
SPECIFIED 


When the output record length differs 
from the input record length, field 
select must be used. For printer programs 
(list function) the input record length 
cannot exceed the size of the print line. 
For DASD programs with key fields (except 
DASD to printer or DASD to DASD) field 
select must be specified. 


XXX INVALID UNPACK 
OUTPUT LENGTH 


The parameter values specified are invalid. 


XXX INVALID PACK OUTPUT 
LENGTH 


XXX RECORD CAPACITY 
EXCEEDED BY PACK 


The xxxth field select parameter specifies 
a field not entirely contained within the 
input or output record. 


XXX RECORD CAPACITY 
EXCEEDED BY UNPK 


XXX RECORD CAPACITY 
EXCEEDED BY FS 


XXX RECORD CAPACITY 
EXCEEDED BY HEX 
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MESSAGE 


REASON 


ACTION 


XXX FIELD SELECT 
PARAMETER FOR 
NONEXISTENT KEY 


A key field was specified in the field select 
statement, but no key was indicated in the 
utility modified statement. 


Job is cancelled. 


INVALID OUTPUT 
RECORD LENGTH 


a. Card output. Record length was greater 
than 80 (EBCDIC) or 160 (binary) . 

b. Tape output. Record length was greater 
than 8192. 

c. Printer output. Record length was 
greater than 144. 

d. DASD output. The output record length 
is greater than 3625 for 2311, 7294 for 
2314 and 2319, or 2000 for data cell. 


INVALID INPUT 
KEY LENGTH 


For a DASD input the key length is greater 
than 255. 


INVALID OUTPUT 
KEY LENGTH 


For a DASD output the key length is greater 
than 255. 


INVALID INPUT 
BLOCK LENGTH 


a. Card input. Block and record length are 
not equal. 




b. Tape input. For fixed length record 
processing the input block length was 
not a multiple of the record length; 
otherwise , the block length was not 
4 greater than the fixed portion - 






c. DASD input. Input block length is 
greater than 3625 for 2311, 7294 for 
2314 and 2319, or 2000 for data cell. 




INVALID OUTPUT 
BLOCK LENGTH 


a. Block length is not a multiple of the 
record length. 




b. For DASD the output block length is 
greater than 3625 for 2311, 7294 for 
2314 and 2319, or 2000 for data cell. 






c. For the copy function the block lengths 
must be equal. 




INVALID INPUT 
DATA LENGTH 


DASD input programs with key require data 
length plus key length to be' less than or 
equal to 3605 for 2311, 7249 for 2314 and 
2319, or 1984 for data cell. 


INVALID OUTPUT 
DATA LENGTH 


DASD output programs with key require data 
length plus key length to be less than or 
equal to 3605 for 2311, 7249 for 2314 and 
2319, or 1984 for data cell. 


XXX FS INPUT 
LENGTH EQUALS 
ZERO 


Input field length has been specified as 
zero. 


XXX PACK INPUT 
LENGTH EQUALS 
ZERO 


XXX UNPK INPUT 
LENGTH EQUALS 
ZERO 
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MESSAGE 


REASON 


ACTION 


XXX HEX INPUT LENGTH 








Job is 


EQUALS ZERO 








cancelled. 


XXX CANNOT PROCESS HEX 




Hexade 


icimal indicator valid only for print 


PARAI-IETER 




output programs . 




XXX CANNOT PROCESS 




Cannot pack a field for print output 


PACK PARAMETER 




programs . 




USER ROUTINE NOT 




User label checking is specified on the 


PRESENT 




UPSI statement, but a user label routine 
is not present. 




RESPECTIVE ORDER OF FILE-TO-FILE PROCESSING MESSAGES 




Messages 








Associated 




(on SYSLST) 


Format 


Function 


Primary Condition 


Conditions 


Processing 


BLOCK NO. 


F, V, 


Copy 


Input block length 


None 


The specified input 


xxxxxx, INPUT 


or U 




is longer than 




block size is 


AREA OVERFLOW 






that specified in 
the utility modi- 
fier statement. 




copied and the re- 
mainder is trun- 
cated. If the rec- 
ords are variable 
length, the count 
field is not 
corrected. ^ 


BLOCK NO. 


F 


Copy 


Input block length 


Only the actual 


xxxxxx , INPUT 






is shorter than 




block size is 


AREA UNDERFLOW 






that specified in 
the utility mod- 
ifier statement. 




copied (no pad- 
ding) . 


BLOCK NO. 


F 


R, F, 


The actual block 


Processing is per- 


xxxxxx, INPUT 




RF, L, 




size is a multi- 


formed as speci- 


AREA UNDERFLOW 




or LF 




ple of the speci- 
fied record size 
but less than 
the specified 
block size. 


fied for the short 
block. This mes- 
sage is not issued 
if the starting 
record number in 
the record-skipping 
parameter has not 
been encountered. 


BLOCK NO. 


F 


R, F, 


The last logical 


Processing is nor- 


xxxxxx, INPUT 




RF, L, 




record of the 


mal up to the short 


AREA UNDERFLOW 




or LF 




input block is 


record. The rec- 


BLOCK NO. 








less than the 


ord is dropped and 


xxxxxx , RCD . 








specified rec- 


processing con- 


NO. XX RECORD 








ord size. 


tinues. This mes- 


AND REMAINDER 










sage is not issued 


OF BLOCK 










if the starting 


DROPPED 










record number in 
the record-skipping 
parameter has not 
been encountered. 
The short record 
is counted as one. 
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MESSAGE 


REASON 


ACTION 


Message 








Associated 




(on SYSLST) 


Format 


Function 


Primary Condition 


Conditions 


Processing 


BLOCK NO. 


V 


R, F, 


Input block length 


The last position 


The overflow rec- 


xxxxxx, INPUT 




RF, L, 


is longer than 


of the specified 


ords from the in- 


AREA OVERFLOW 




or LF 


that specified 


block is the last 


put block are trun- 








in the utility 


position of a 


cated. This mes- 








modifier 


logical record. 


sage is issued even 








statement. 




if the first rec- 
ord to be proc- 
essed has not been 
reached. The trun- 
cated records are 
not counted. 


BLOCK NO. 


V 


R, F, 




The last logical 


The input block 


xxxxxx, INPUT 




RF, L, 




record in the 


(and the last logi- 


AREA OVERFLOW 




LF 




specified block 


cal record) are 


BLOCK NO. 








size is not com- 


t r un c at e d . The 


xxxxxx, RCD. 








plete within 


truncated record 


NO. XX RECORD 








the block. 


is dropped. The 


AND REMAINDER 










second message is 


OF BLOCK 










not issued if the 


DROPPED 










starting record 
number in the rec- 
ord skipping param- 
eter has not been 
encountered. The 
dropped part of 
the block is 
coiinted as one. 


BLOCK NO. 


V 


R, F, 


An input logical 


Processing of 


xxxxxx , RCD . 




RF, L, 


record contains 




the current block 


NO. XX RECORD 




or LF 


an invalid length 




cannot proceed and 


AND REMAINDER 






field. A record 




the block is 


OF BLOCK 






length field is 




dropped. This mes- 


DROPPED 






invalid if it is 
less than 5 or 
is not equal to 
the number of 
bytes read. 




sage is issued even 
if the record- 
skipping parameter 
number has not been 
reached. The part 
of the block is 
counted as one. 


BLOCK NO. 


V 


F, RF, 


The length of a 


The record is 


XXXXXX , RCD . 




or LF 


logical input rec- 




dropped and proc- 


NO. XX, SHORT 






ord is less than 




essing continues 


VARIABLE 






that specified 




with the next rec- 


LENGTH RECORD 






as the fixed por- 




ord, if present. 


DROPPED 






tion of the var- 
iable-length 
records . 




This message is not 
issued if the 
record-skipping 
parameter has not 


; 








been encountered. 












The dropped rec- 












ord is counted as 












one. 
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MESSAGE 


REASON 


ACTION 1 


Messages 








Associated 




(on SYSLST) 


Format 


Function 


Primary Condition 


Conditions 


Processing 


BLOCK NO. 


V 


Rr F, 


A generated output 




The generated block 


xxxxxx, OUTPUT 




RF, L, 


record exceeds 




is trxincated. The 


AREA OVERFLOW 




or LF 


the block size 
specified in the 
utility modifier 
statement. 




block count and 
record count are 
corrected and the 
block written out. 


BLOCK NO. 


F or 


C,R,F, 


The key length 


a. For unde- 


Processing 


xxxxxx. 


V 


RF,L, 


for this block 


fined records. 


continues , with the 


KEY LENGTH IS 




or LF 


is invalid, or 


the message 


output record 


XXX 






it differs from 


should not 


formatted as speci- 








the key length 


occur. 


fied in the utility 








specified in the 




modifier statement 








utility modifier 


b. For fixed- 


(if valid specifi- 








statement. 


length rec- 
ords with no 
key fields 
specified, or 
variable 
length rec- 
ords, only 
the data 
portions are 
processed. 

c. For fixed- 
length records 
with key fields 
specified, the 
actual and 
specified key 
length differ. 
Both key and 
data fields 
are processed 
as specified 
(i.e. , if the 
actual key is 
less than that 
specified, the 
difference is 
made up with 
data bytes ; 
if greater, the 
excess is 
treated as data 


cation) . 








bytes. ) 
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RESPECTIVE ORDER OF FILE-TO-FILE INFORMATIONAL MESSAGES 


Control parameter diagnostics are followed by logging messages in this order. 


MESSAGE 


ACTION 


CARD TO DISK 

CARD TO PRINTER/PUNCH 

CARD TO TAPE 

DATA CELL TO DATA CELL 

DATA CELL TO DISK 

DATA CELL TO PRINTER 

DATA CELL TO TAPE 

DISK TO CARD 

DISK TO DATA CELL 

DISK TO DISK 

DISK TO PRINTER 

DISK TO TAPE 

TAPE TO CARD 

TAPE TO DATA CELL 

TAPE TO DISK 

TAPE TO PRINT 

TAPE TO TAPE ) 


UTILITY 


Identifies the particular utility program. 
The program continues processing. 


'FIXED PORTION xxxx \ 

)KEY LENGTH XXXX ( 

INPUT DATA LENGTH xxxxx / 

/ RECORD LENGTH xxxx \ 

' BLOCK LENGTH XXXX / 


Processing continues. (x represents 
a digit. ) 


.FIXED PORTION xxxx \ 

\kEY LENGTH XXXX / 

OUTPUT DATA LENGTH xxxxx > 

/record length xxxx \ 
(block length xxxx ) 




- CARD BCD \ 

\card binary / 
input < no rewind, unload \ 

1 REWIND \ 

'rewind, unload / 




OUTPUT i 
OPTION^ 


^bcd, character "^ 

CARD BCD 
CARD BINARY 
DISK WRITE CHECK 

NO DISK WRITE CHECK I 
PRINT CHARACTER ) 
PRINT HEX 

NO REWIND, UNLOAD (write TAPE MARK} 
REWIND (WRITE TAPE MARK} 
^REWIND, UNLOAD (WRITE TAPE MARK} ^ 




/x INPUT, x OUTPUT \ 

tx INPUT/OUTPUT / AREAS ASSIGNED 




(fixed 1 

record format \ variable > 

(undefined ) 
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MESSAGE 


ACTION 


TYPE< 


/t;OPY >» 
DATA DISPLAY 
FIELD SELECT 
LIST 

LIST, FIELD SELECT 
PRINT AND PUNCH 
PRINT, PUNCH, FIELD SELECT 
REBLOCK 

Lreblock, field select ^ 


> 


Processing continues. (x represents 
a digit. ) 


STARTING SEQUENCE COLUMN XX 


SEQUENCE LENGTH xx 


STARTING RECORD NUMBER xxxxxxxx 


INPUT DEVICE TYPE xxxx 


These messages are printed for DASD 

devices. xxxx indicates 2311, 2314 * 

or 2321. 

* 2314 is also printed when a 2319 is used. 


OUTPUT DEVICE TYPE xxxx 


REPLY X 


This message is printed to indicate the 
reply given to a diagnostic printed on 
SYSLOG. The action taken is indicated by 
the letter x. Processing continues. 


1ST CHARACTER FORMS CONTROL TYPE )^ \ 

'd ; 


Processing continues. 


XX ERRORS FOUND IN CONTROL CARDS 


CARD SEQUENCE ERROR, CURRENT SEQ xxxxxxxxxx 
LAST SEQ xxxxxxxxxx 


END OF DATA 


END OF DATA will not be printed for first- 
character forms control. 


FILE MARK WRITTEN IN 

XT. NO. Bl CI C2 HI H2 R 

XXX XXX XXX XXX XXX XXX XXX 


For DASD output programs the decimal value 
of the EXTENT sequence number and the 
address of the file mark (written at the 
end of the file) are logged. The headings 
represent bin (Bl) , subcell (CI) , strip 
(C2) , cylinder (HI), track (H2) , and 
record (R) numbers for data cell. For 
disk, they represent cylinder (C2) , track 
(H2) , and record (R) numbers. 


NUMBER OF /INPUT \ BLOCKS PROCESSED xxxxxx 
( OUTPUT / 


Processing continues. 


SPECIFIED STARTING RECORD NO. LARGER THAN 
TOTAL NO. OF LOGICAL INPUT RECORDS 


END OF JOB 
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Appendix D. Tape Compare, Copy/Restore, 
and Initialize Tape Program Messages 



The following are tape coirpare diagnostic messages that appear on the device assigned 
to SYSLST. This device can be either a printer or a tape unit. 



MESSAGE 


REASON 


ACTION 


INVALID INPUT DEVICE AT SYS004 


The device assigned to SYS004 
is not valid for this program. 


Job is cancelled. 


INVALID OUTPUT DEVICE AT SYS005 


The device assigned to SYS005 
is not valid for this program. 


REC. NO. xxxxxxx, CAUSEy 

xxxlOO characters of file A 
dataxxx 

xxxlOO characters of file B 
dataxxx 

index line * 


The record number identifies the 
data records. The reason (CAUSE) 
the data is printed is identified 
by the character y which may be; 

4-the records do not compare. 

6-one of both records are 
greater than the maximum 
specified. 

7-the records are not of an 
equal length. 

The priority of the messages is 
7, 6, then 4. 

The index line refers to each 
character compared. A (-) indi- 
cates the characters were equal; 
an (*) indicates an unequal 
compare . 



The following are copy/restore informational messages that appear on the device 
assigned to SYSLST. 



MESSAGE 


ACTION 


FILE COPY REQUESTED 
VOLUME 

RECORD SIZE EQUALS nnnn 
(nnnn replaced by decimal 
record size) 

IPL OPTION REQUESTED 

INPUT DEVICE is a 2 3xx 
(XX is 11 or 14)* 


Processing 
continues. 



♦2314 is also printed when a 2319 is used 
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The following are the diagnostic messages fcr the initialize tape program that appear 
on the device assigned to SYSLOG. See page 169 for more initialize tape messages. 



MESSAGE 


REASON 


ACTION 


INCORRECT CARD 


Volxime-image card is 
missing or first three 
characters are not VOL. 


Job is cancelled. 


CARD READ WAS NOT INTT 


Utility control statement 
does not start with // INTT. 


NO TAPES ASSIGNED 


No tape unit was assigned 
to SYSOOO (required as the 
first assignment) , 


SERIAL NOT OR 
INCORRECTLY SPECIFIED 


SERIAL parameter is missing or 
incorrectly specified in the 
utility control statement. 


CODE NOT OR INCORRECTLY 
SPECIFIED 


CODE parameter is missing or 
incorrectly specified in the 
utility control statement. 


END OF JOB 


End-of-job for the utility 
program. 


Processing 
continues . 


ABOVE VOL CARDS 
DID NOT PROCESS 


An error was detected in 
volume-image cards. 


Job is cancelled. 


SEQUENCE ERROR DETECTED 


Volume-image cards are not 
in the proper sequence. 


PASS nn OF TAPES ASSIGNED 


Initialization cycle nn is 
started. 


Processing 
continues . 


SYSnnn 


Indicates the number of the 
logical unit on which a tape 
reel has been initialized. 
(This message is followed by 
the printing of the label 
written onto the tape . ) 
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Appendix E. Clear Data Cell and Clear Disk Program Messages 



The following are informational or diagnostic messages that appear on the device 
assigned to SYSLST. This device can be either a printer or a tape unit. 



MESSAGE 


REASON 


ACTION 


CLEAR DATA CELL UTILITY 


The name of the program is logged 


Processing continues. 


CLEAR DISK UTILITY 


for identification. 




UTILITY CONTROL CARDS 


This heading message immediately 
precedes the logging of the control 
cards. 




INVALID CARD 


Valid utility control cards begin 
with //bU; //bEND; or with ./bU; 
. /bEND . 


Job is cancelled. 


INVALID PARAMETER 


Valid parameters begin with B, C, 




X, 0, and E. None of these 






parameter identifiers may be 






repeated with the control card, nor 






may C and X appear together. 




INVALID FORMAT 


The format of at least one of the 




above parameters is incorrect; e.g., 






the key and data lengths must be 






specified as B= (K-1 to 3 digits. 






D=l to 4 digits) . 




INVALID KEY LENGTH 


The key length must be ^ and < 255. 


INVALID DATA LENGTH 


The data length must be greater than 




0. If a key length specification is 






greater than , the key length plus 






the data length must be <1984 for 






data cell, <3605 for 2311, or<7249 






for 2314 and 2319. If a key length 






specification is equal to 0, the 






data length must be < 2000 for data 






cell, <3625 for 2311, or < 7294 for 






2314 and 2319. 




INVALID OUTPUT PARAMETER 


Valid output parameter values are OY 




or ON. 


- 


INVALID DEVICE TYPE 


Valid device type parameters are 


PARAMETER 


2311, 2314*, and 2321. 

*If a 2319 is used, the valid 

parameter is 2314. 




I/O AREA NOT ENOUGH FOR 


The block size specified in the 


SPECIFIED RECORD SIZE 


utility modifier statement exceeds 
the main storage available. 




SPECIFIED PARAMETERS 


This heading message identifies the 
specified utility modifier 
statement parameters. 


Processing continues. 


ASSUMED PARAMETERS 


This heading message identifies the 




assumed utility modifier 






statement parameters. 
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MESSAGE 


REASON 


ACTION 


CYL xxx TRACK xxx 
IS IN ERROR 


For the referenced track, a no 
record found or a track overflow 
condition has been posted. 
Records on this track may be 
invalid. 


Processing 
Continues. 


NO END CARD 


Either no END card was supplied 
(//bEND) , or a noncontrol 
statement was read before END. 


Job is 
cancelled. 


Informational messages are logged in this order. 


KEY LENGTH - xxx 
DATA LENGTH - xxxx 
FILL CHARACTER - /X'xx'\ 
IC'x' f 
OUTPUT PARAMETER - x 
DEVICE TYPE - xxxx 
RECORDS/TRACK - xx 

PYTFNT BB LOWER LIMIT UPPER LIMIT 
SEQ. NO. Cl C2 HI H2 Cl C2 Hi H2 
XXX xxx xxx xxx xxx xxx xxx xxx xxx xxx 
xxx xxx xxx xxx xxx xxx xxx xxx xxx xxx 

• • • • • • 

• • •••• •• 

END OF JOB 
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File-to-File Messages 



at the point where the punch check 
occurred. 



8001D IS IT EOF 



Cause: Tape input is specified as 
unlabeled. A tape mark was 
encountered on the input file 
tape. 

S yst em A ction; The systeir waits 
for an operator response. 

Progra mmer A ct ion; Not 
applicable. 

Opera tor _ Action; Type Y if end of 
file, (the file does not reside on 
the next volume) , or 

Type N if end of volume. 
(Processing should continue on 
next volume.) 



D e f au 1 t_S y;s t ern_Act i on ; 
file assumed. 



End of 



Tape Compare Messages 



8003A 



ALTA OR ALTB PARAMETER SPECIFI ED 
TWICE 

Caus e; The ALTA or ALTE parameter 
in the tape compare utility 
control staterrent has been 
specified twice. 

This is probably a user error. 

Sys tem_Ac ti on : The system waits 
for an operator response. 

Pr ogrammer Action ; If the problem 
recurs, do the following to 
complete your problem 
determination action: 

1. Take a main storage dump at 
once and retain the listing. 



8002A PUNCH CHECK 



Cause: A punch check occurred on 
the card read punch (2520 or 
2540) . 

This is probably a hardware error, 

S ys tem Ac tion: The system waits 
for an operator response. 



P ro gramme r Actio n : 
applicable. 



Not 



Operat or Actio n: Run cut cards in 
punch, discard last three or four 
cards (for the 2520, one punched 
and two blank cards; for the 2540, 
two punched and two blank cards) . 
Ready the punch and type any 
character to continue processing. 

If the problem recurs, issue the 
ROD command, execute ERSP and 
retain the listing to complete 
your problem deterrrinaticn action. 

Default Syst eir Actio n: After the 
punch is restarted, processing 
continues. The card in error and 
the following cards are repunched 



2. Have the systeir log, job 
stream, and printer output 
available. 

Operat or Action: Repunch the 
utility control statement (// 
TPCP.,.) specifying ALTA or ALTB 
only once, and enter the corrected 
card on SYSIPT. Type 2 on the 
console typewriter to continue 
processing. 

If there is one alternate tape 
unit for both file A and file B, 
the utility control statement 
should include both ALTA and ALTB, 
or 

Type any character ether than 2 to 
terminate the job. 

Default Syst em A ction: The job is 
cancelled. 



80041 // TPCP RE CSIZ= (n nn nn) 

Cause; The physical record size 
(in bytes) specified in the 
utility control statement is 
printed on the console typewriter, 
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This message is issued for 
information only. 

Syste m Actio n: Processing 
continues. 

Programmer Actio n: Not 
applicable. 

O perator Action ; Not applicable. 



8005A // TPCP RECSIZ= (FORMAT IS 
INCORRECT) 



Cause: Control statement format 
is invalid. 

This is probably a user error. 

P rogrammer Action; Not 
applicable. 

O perator Action : Repunch the 
utility control statement (// 
TPCP...) using the correct format 
and enter the corrected card on 
SYSIPT. Type 2 on the console 
typewriter to continue processing, 
or 

Type any character other than 2 to 
terminate job. 

If the problem recurs, do the 
following to complete your problem 
determination action; 



2. Have the job stream, system 
log, and printer output 
available. 



Opera tor Action ; Repunch the 
utility control statement (// 
TPCP...) with the correct record 
size or reel count and enter the 
corrected card on SYSIPT. Type 2 
en tiiG consoj.e typewriter to 
continue processing, or 

Type any character other than 2 to 
terminate the job. 



i^tij-ctu-Lu oyautiit: rt<JL -Hj ii: xiit: juu xtj 

cancelled. 



8007A INVALID R EC ORD SIZE OR REEL COUNT 
PARAMETER 

Cause: Record size is greater 
than five digits, or reel count 
exceeds 255. 

This is probably a user error. 

System Action ; The system waits 
for an operator response. 

Programmer Action : If the problem 
recurs,, do the following to 
complete your problem 
determination action: 



1. Take a main storage dump and 
retain the listing. 

2. Have the job stream, printer 
output, and system log 
available. 



1. Take a main storage dump at 
once and retain the listing. 

2. Have the system log, printer 
output, and job stream 
available. 



Default System A ctio n; The job is 
cancelled. 



8006A RECORD SIZE OR REEL COUNT 
PARAMETER MISSING 

Cause; The value for the RECSIZ 
or REELS parameter on the utility 
control statement is missing. 

This is probably a user error. 

System Actio n; The system waits 
for an operator response. 

Programmer Action:. If the prcbler 
recurs, do the following to 
complete your problem 
determination action; 

1. Take a main storage dump at 
once and retain the listinq. 



Operator Action : Repunch the 
utility control statement (// 
TPCP...) supplying the correct 
record size or reel count, and 
enter the corrected card on 
SYSIPT. Type 2 on the console 
typewriter to continue processing, 
or 

Type any character other than 2 to 
terminate the job. 

Default System Action : The job is 
cancelled. 



8008A LEADING ZERO I N REC ORD SIZE OH 
REEL COUN T PARAiVlETER 

Cause; A leading zero is invalid 
in a control statement parameter. 

This is probably a user error. 



\/-» J 



2. Have the console log, printer 
output, and the job stream 
available. 



Labeled files were specified 
and a tapemark preceded the 
label, or 



Operat or Actio n; Repunch the 
utility control stateirent (// 
TPCP...) reducing the specified 
record size to the capacity of the 
I/O area, and enter the corrected 
card on SYSIPT. Type 2 on the 
console typewriter to continue 
processing, or 

Type any character other than 2 to 
terminate the job. 

Default System Action; The job is 
cancelled. 

LQ12A USER EXIT SPECIFIED BUT NONE 
SUPPLIED 

Cause; The EXIT parameter has 
been specified in the utility 
control statement but no user exit 
routine has been supplied in the 
card deck. 

This is probably a user error. 

System Actio n; The system waits 
for an operator response. 

Progra mmer Actio n; Supply the 
user exit routine or remove the 
EXIT parameter from the utility 
control statement. 

If the problem! recurs, do the 
following to complete your problem 
determination action; 

1. Take a main storage dump and 
retain the listing. 

2. Have the job stream, printer 
output and system log 
available. 



• Two tapemarks preceded either 
the first data record or the 
trailer label. 

This is probably a user error. 



System Action; The system waits 
fcr an operator response. 



Programmer Action; Take a tape to 
printer dump of the label area to 
check labels. 

If the problem recurs , do the 
following to complete your problem 
determination action; 

1. Take a main storage dump at 
once and retain the listing. 

2. Have the job stream, printer 
output, system log, and label 
area dump listing available. 

O pe rator Action ; Mount the 
correct tapes , or 

Correct the assignment of the 
logical unit, or 

Repunch the utility control 
statement to reflect unlabeled 
tapes and enter the corrected 
statement on SYSIPT. Type 2 on 
the console typewriter to continue 
processing, or 

Type any character other than 2 to 
terminate the job. 

Default System Action; The job is 
cancelled. 



Operat or Actio n; Repunch the 
utility control statement (// 
TPCP. . . ) omitting the EXIT 
parameter, and enter it on SYSIPT. 
Then type 2 on the console 
typewriter to continue processing. 

Type any character other than 2 to 
terminate job. 

Def au lt_Sys t em_Act ion : The job is 
cancelled. 

8 013A INVALID TPMK DETECTED ON FILE n 

Cause ; An unexpected tapemark 
encountered on file A or B; 



8014A VOLUME LABEL MISSING ON FILE n 

Cause; Standard labels are 

indicated in the utility control 

statement but no label was found 
on file A or B. 

This is probably a user error. 

System Action; The system waits 
for an operator response. 

Programmer Actio n; If the tape 
should contain standard labels, 
take a tape to printer dump of the 
label area and verify that a VOLl 
label is the first label on the 
tape. 
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2. Have the console log, printer 
output, and the job stream 
available. 



Labeled files were specified 
and a tapemark preceded the 
label, or 



Operat or Actio n; Repunch the 
utility control stateirent (// 
TPCP...) reducing the specified 
record size to the capacity of the 
I/O area, and enter the corrected 
card on SYSIPT. Type 2 on the 
console typewriter to continue 
processing, or 

Type any character other than 2 to 
terminate the job. 

Default System Action; The job is 
cancelled. 

LQ12A USER EXIT SPECIFIED BUT NONE 
SUPPLIED 

Cause; The EXIT parameter has 
been specified in the utility 
control statement but no user exit 
routine has been supplied in the 
card deck. 

This is probably a user error. 

System Actio n; The system waits 
for an operator response. 

Progra mmer Actio n; Supply the 
user exit routine or remove the 
EXIT parameter from the utility 
control statement. 

If the problem! recurs, do the 
following to complete your problem 
determination action; 

1. Take a main storage dump and 
retain the listing. 

2. Have the job stream, printer 
output and system log 
available. 



• Two tapemarks preceded either 
the first data record or the 
trailer label. 

This is probably a user error. 



System Action; The system waits 
fcr an operator response. 



Programmer Action; Take a tape to 
printer dump of the label area to 
check labels. 

If the problem recurs , do the 
following to complete your problem 
determination action; 

1. Take a main storage dump at 
once and retain the listing. 

2. Have the job stream, printer 
output, system log, and label 
area dump listing available. 

O pe rator Action ; Mount the 
correct tapes , or 

Correct the assignment of the 
logical unit, or 

Repunch the utility control 
statement to reflect unlabeled 
tapes and enter the corrected 
statement on SYSIPT. Type 2 on 
the console typewriter to continue 
processing, or 

Type any character other than 2 to 
terminate the job. 

Default System Action; The job is 
cancelled. 



Operat or Actio n; Repunch the 
utility control statement (// 
TPCP. . . ) omitting the EXIT 
parameter, and enter it on SYSIPT. 
Then type 2 on the console 
typewriter to continue processing. 

Type any character other than 2 to 
terminate job. 

Def au lt_Sys t em_Act ion : The job is 
cancelled. 

8 013A INVALID TPMK DETECTED ON FILE n 

Cause ; An unexpected tapemark 
encountered on file A or B; 



8014A VOLUME LABEL MISSING ON FILE n 

Cause; Standard labels are 

indicated in the utility control 

statement but no label was found 
on file A or B. 

This is probably a user error. 

System Action; The system waits 
for an operator response. 

Programmer Actio n; If the tape 
should contain standard labels, 
take a tape to printer dump of the 
label area and verify that a VOLl 
label is the first label on the 
tape. 
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If the problem recurs, do the 
following to complete your prcbleir 
determination action: 

1. Retain the label area 
listing. 

2. Take a main storage dump at 
once and retain the listing. 

3. Have the system log, the 
printer output, and the job 
stream available. 



Operator Action: Mount the 
correct tape, or 

Correct the assignment of the 
logical unit, or 

If the tape is unlabeled, repunch 
the utility control statement 
omitting the LABELS parameter, and 
enter the corrected statement on 
SYSIPT. Type 2 on the console 
typewriter to continue processing, 
or 



Operator Action : 
correct tape, or 



Mount the 



Correct the assignment of the 
logical unit, or 

If the tape is unlabeled, repunch 
the utility control statement 
omitting the LABELS parameter, and 
enter the corrected statement on 
SYSIPT. Type 2 on the console 
typewriter to continue processing, 
or 

Type any character other than 2 to 
terminate the job. 



Default Syst em A ction; The job is 
cancelled. 



8 015A HEADER LABEL MISSING ON FILE n 

Cause: Standard labels are 
indicated in the utility control 
statement but no header label was 
found on file A or B. 

This is probably a user error. 

System Action; The system waits 
for an operator response. 

Progra mmer Actio n; If the tape 
should contain standard labels, 
take a tape to printer dump of the 
label area and verify that a 
header label is on the tape. 

If the problem recurs, do the 
following to complete your problem: 
determination action: 

1. Retain the label area 
listing. 

2. Take a main storage dump at 
once and retain the listing. 

3. Have the system log, the 
printer output, and the job 
stream available. 



Type any character other than 2 to 
terminate the job. 



Def ault System Actio n: The job is 
cancelled. 



8016A TRAILER LABEL MISSING ON FILE n 



Cause; Standard labels are 
indicated in the utility control 
statement but no trailer label was 
fcund on file A or E. 

This is probably a user error. 

System Action : The system waits 
for an operator response. 

Programmer Action; If the tape 
should contain standard labels, 
take a tape to printer dump of the 
label area and verify that EOV or 
EOF appears on the tape. 

If the problem, recurs, do the 
following to complete your problem 
determination action: 

1. Retain the label area 
listing. 

2. Take a main storage dump at 
once and retain the listing. 

3. Have the system; log, the 
printer output, and the job 
stream available. 



Operator Ac tio n : 
correct tape, or 



Mount the 



Correct the assignment of the 
logical unit, or 

If the tape is unlabeled, repunch 
the utility control statement 
omitting the LABELS parameter, and 
enter the corrected statement on 
SYSIPT. Type 2 on the console 
typewriter to continue processing, 
or 
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Type any character other than 2 to 
terminate the job. 

Defau lt Sy st eir Action ; The job is 
cancelled. 



8 017D EOF ON UNLABELED FILES 



Defaul t S ys tem Actio n; The job is 
cancelled. 



8019D EOF ON FILE B AND NOT ON A 

Cause; File B is shorter than 
file A. 



Caus e; A tapemark was detected on 
an unlabeled file and the reel 
count is depleted. 

The job step is completed. 



System Action ; The system waits 
for an operator response. 

P rogrammer Action : Not 
applicable. 

Operator Action; Supply control 
statement on SYSIPT and type 2 to 
continue processing, or 

Type any character other than 2 to 
terminate the job. 

Default System Ac tio n; The jcb is 
cancelled. 



80180 EOF ON FILE A AND NOT ON B 

Cause; File A is shorter than 
file E, 

This is probably a user error. 

System Act ion; The system waits 
for an operator response. 

Programmer Action; Verify that 
the correct tapes were supplied 
with the job. 

If the problem recurs do the 
following to complete your problem 
determination action; 

1. Have listings of the tape 
files or records in question 
available. 

2. Have the job stream, printer 
output, and system leg 
available. 



TVii c -i a i-< •K•<-^ 1" o V> 1 tj 



System Action : The system waits 
for an operator response. 

Programmer Action; Verify that 
the correct tapes were supplied 



If the problem recurs, do the 
following to complete your problem 
determination action; 

1. Have listings of the tape 
files or records in question 
available. 

2. Have the job stream, system 
log, and printer output 
available. 

Ope rator A ction ; Mount the 
correct tapes, reenter the utility 
control statement on SYSIPT, and 
type 2 on the console typewriter 
to continue processing, or 

Type any character other than 2 to 
terminate the job. 

Def ault_Sy s tem_Act ion ; The job is 
cancelled. 



8020A CHANGE REEL ON PRIMARY A 

Cause; An alternate reel was not 
assigned to primary A and EOV was 
detected. 

System Action; The system waits 
for an operator response. 

Programmer Action ; Not 
applicable. 

Operator Action; Change the reel 
and type any character to continue 
processing. 



Operator Action; Mount the 
correct tapes, reenter the utility 
control statement on SYSIPT, and 
type a 2 on the console typewriter 
to continue processing, or 

Type any character other than 2 tc 
terminate the job. 



80211 SWITCHING TO ALTERNATE A 

Cause; Primary reel is completed 
and processing continues with 
alternate reel. 

This messages is for information 
only. 
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System Action : Processing 
continues. 



Programmer Action: Not 
applicable. 

Oper ator Action; Not applicable. 



on the console typewriter to 
continue processing, or 

Type any character other than 2 to 
terminate the job. 

Default S y stem Actio n; The job is 
cancelled. 



80 22A CHANGE REEL ON PRIMARY B 

Cause: An alternate reel was not 
assigned to primary B and EOV was 
detected. 

System Action; The system waits 
for an operator response- 

Progr amm er A ctio n : Not 
applicable. 

Op erator Actio n; Change the reel 
and type any character to continue 
processing. 



80231 SWITCHING TO ALTERNATE B 

Cause; Primary reel is completed 
and processing continues with 
alternate reel. 



8025A RESTART WAS REQUESTED 



Caus e; The interrupt key was 
pressed during execution. 

System Action ; The system waits 
for an operator response. 

Programmer Actio n; Not 
applicable. 

Operator Action : Type a blank to 
continue processing, or 

Supply new control statement on 
SYSIPT and type 2 to restart, or 

Type any character other than 
blank or 2 to terminate the job. 

Default Sy ste m Action: The job is 
cancelled. 



This message is for inforiraticn 
only. 

System Action : Processing 
continues. 

Programmer Action; Not 
applicable. 

Operator Action: Not applicable. 



802UD REEL COUNT DEPLETED 

C aus e : The reel count is depleted 
on a labeled file and no EOF 
trailer label was sensed. 

This is probably a user error. 

System Action; The system waits 
for an operator response. 

Programmer Actio n; If the problem 
recurs, have the job stream, 
program output, system log, and 
printer output available to 
complete your problem 
determination action. 

Operat or Action: Repunch the 
utility control statement (// 
TPCP...) supplying the correct 
REELS parameter, and enter the 
corrected card on SYSIPT. Type 2 



8026D EOF ON LABELED FILES 



Cause 



An end-of-file trailer 



label has been detected on both 
files. 

System Action; The system waits 
for an operator response. 

Programmer Action ; Not 
applicable. 

Opera tor A ction: Mount new tapes, 
supply a new utility control 
statement to SYSIPT, and type 2 on 
the console typewriter to continue 
processing, or 

Type any character other than 2 to 
terminate the job. 

Default Sy stem Actio n; The job is 
cancelled. 



8027A CONTROL CA RD MI SSING 

Cause: TPCP control statement was 
omitted. 

This is probably a user error. 

Sys tem Action; The system waits 
for an operator response. 
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Programnier Action: If the prcbleni 
recurs, have the job stream, 
printer output, and the systeir log 
available to complete your problem 
determination action. 



Operator Action: Supply TPCP 
control statement on SYSIFT and 
type 2 to continue processing, cr 

Type any character other than 2 to 
terminate the job. 

Default Systeir Action: The jcb is 
cancelled. 



Copy /Restore Disk or Data Cell Messages 



80501 NOT_A_STD_R0_RECORD 

Cause; A nonstandard RO record 
was encountered on disk input 
file, indicating that the disk was 
not properly initialized. A pack 
with a nonstandard RO cannot be 
copied. 

This is probably a hardware error. 

System Action; The job is 
cancelled. 

Progra mmer Actio n; Instruct the 
operator to mount the correct disk 
pack and resubmit the job, or 

Initialize the defective disk 
pack, recreate the file, and 
resubmit the job. 

If the problem recurs, have the 
job stream, program listing, log 
sheet, and printer output 
available to complete your problem 
determination action. 

Operator Action; Check that the 
proper disk pack is mounted and 
that the assignments are correct. 
If corrections are necessary, 
rerun the job. 



80511 NgT_A_STD_RO_RECQRp 

Cause; A nonstandard RO record 
was encountered on disk output 
file, indicating that the disk was 
not properly initialized. A pack 
with a nonstandard RO cannot be 
restored. 



Sys t em_Ac t ion 
cancelled. 



The job is 



Programmer Action: Check that the 
proper mounting and assignment 
instructions were given, or 

Initialize the output disk pack. 
Resubmit the job. 

If the problem recurs, do the 
following to complete your problem: 
determination action; 

1. Have the job stream, program 
listing, log sheet, and 
printer output available. 

2. Execute a stand-alone dump at 
the time of the failure and 
save the output. 



Operator Action; Check that the 
proper disk pack is mounted and 
that the assignments are correct. 
If corrections are necessary, 
rerun the job. 



8052p RECORD GREATER THAN I/O AREA 

Cause; The size of the record 
read is greater than the size of 
the available I/O area. 

This is probably a user error. 

System Action; The system waits 
for an operator response. 

Programmer Action: If the record 
can be truncated, resubmit the job 
and instruct the operator to reply 
2 to this message, or 

Resubmit the job with a request 
for a larger partition allocation. 

If the problem recurs , have the 
jcb stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action: Type 2 to 
truncate record and continue 
processing, or 

Type any character other than 2 to 
cancel the job. Allocate a larger 
partition and rerun the job. 

Default System Action; The job is 
cancelled. 



This is probably a hardware error. 



80b3l I/O AREA INSUFFICIENT 
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Cause: Insufficient I/O area 
available for the indicated 
average record size. 

This is probably a user error. 

System Act ion; The job is 
cancelled. 

Proqramnier A ct ion; Resubmit the 
job with a request for a larger 
partition. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available, to complete your 
problem determination action. 

Opera tor _Ac tion ; Allocate a 
larger partition and rerun the 
job. 



80541 NO VO Ll LABEL 

Cause; No VOLl label was found 
while searching for the VTOC 
address. The file has been 
destroyed or does not exist on 
that volume. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Progr ammer Action ; Assign the 
correct volume and resubmit the 
job. 

If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Execute LISTVTOC for the 
subject volume and have the 
output available. 

3. Execute a stand-alone dump at 
the time of the failure. 

Opera tor Actio n; Mount the 
correct pack and resubmit the job. 



80551 SYS00 5 NOT ASSIGNED 

Cause ; A tape was not assigned to 
SYS005 as an output unit. 

This is probably a user error. 

Syste m A ction: The job is 
cancelled. 



Programmer A ction: Resubmit the 
job with the correct assignment 
fcr SYS005. 



Ope rat or A ction; Assign SYS005 to 
the output tape and rerun the job. 

If the problem recurs, do the 
following to comiplete your problem 
determination action; 

1. Have the job streami, log 
sheet, and printer output 
available. 

2. Issue the LISTIO command and 
have the output available. 



80561 IPL SPECIFIED AND NOT FO UND 

Cause; No IPL records were found 
when the option was requested for 
the copy file. 

This is probably a user error. 

System Action: The job is 
cancelled. 

Pro g ra mme r A ction ; Omit the IPL 
parameter in the utility modifier 
statement or assign the input to 
the correct copy file. 

If the problem recurs , do the 
following to complete your problem 
determination action; 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Execute the disk to printer 
utility to obtain a listing 
of cylinder 0, track 0. 

Operator Action; Check that the 
correct copy file has been 
mounted. If correction is 
necessary, rerun the job. 



80571 TAPE RECORD GREATER THAN MAX_I/Q 
AREA 

Cause: The tape record being 
restored is greater than the 
maximum I/O area available. The 
program that created the tape was 
probably run in a larger 
partition. 

This is probably a user error. 

System Action; The job is 
cancelled. 
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Prograinitier Action : Request a 
greater storage allocation for the 
probleip program and resubmit the 
job. 

If the probleir recurs, do the 
following to complete your problem 
determination action: 



sheet, and printer output 
available. 



Default System Action: The job is 
cancelled. 



8059A READER OUT OF INPUT 



Cause; The card reader is out of 
cards. 

This is probably a user error. 



2. Execute a tape to printer 
utility for the record in 
question and have the output 

Operator Ac tio n: Allocate a 
larger partition and rerun the 
job. 



8058A INPUT IS OUT OF SEQUENCE 

C aus e : The card input is out of 
sequence, or 

The tape reel is out of sequence. 

This is probably a user error. 

System Action: The system waits 
for an operator response. 

Programm er Action ; Check the 
input card deck for correct 
sequence or the tape reels for 
proper mounting sequence. 

If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Execute a tape to printer 
utility for the record in 
question and have the output 
available. 

3. Execute a stand-alone dump at 
the time of the failure. 

Operator Action: Correct card 
sequence and type 2 to continue 
processing, or 

Mount a new tape and type 2 tc 
continue processing. If an 
alternate tape is assigned, the 
new tape must be placed on the 
next assigned tape drive, or 

Type any character other than 2 tc 
cancel the job. 



Syste m Ac tion: The system waits 
for an operator response. 



Programmer Action; Check the card 
deck to insure that all necessary 
cards were supplied. Make any 
necessary corrections and resubmit 
the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Ope rat or Actio n : Supply 
additional card input and type 2 
to continue processing, or 

Type any character other than 2 to 
cancel the joh. 

Default System Action: The job is 
cancelled. 



80601 SYSOQtt NOT ASSIGNED 

Cause; A tape was not assigned to 
SYS004 as an input unit, or 

A card reader was not assigned to 
SYS004, or 

A disk was not assigned to SYS004 
fcr a copy volume function. 

This is probably a user error. 

System Action: The job is 
cancelled. 

Programm er Action ; Not 
applicable. 

Qpeggtor Ac tio n ; Issue the LISTIO 
command to check the assignments, 
assign SYS004 to the input unit, 
and rerun the job* 

If the problem recurs, have the 
job stream, log sheet, printer 
output and LISTIO output available 
tc complete your problem 
determination action. 
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8 0611 CONTROL RECORD NOT FOUND 



Progr amme r Action : Not 
applicable. 



Cause: The first data record read 
was not a control record. The 
control record is written by the 
copy program and contains 
parameters unique to this file. 
This message can occur if a tape 
is mounted out of sequence, the 
wrong tape is mounted, or the 
wrong pack is mounted. 

This is probably a user error. 

Sys tem Actio n; The job is 
cancelled. 

Programm er Actio n; Correct the 
input and resubmit the job. 

If the problem recurs, do the 
following to complete your problem 
determination action; 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Execute a tape to printer 
utility for the record or 
file in question and have the 
output available. 

Operator _ Action; Check that the 
correct pack or tape is ircunted. 
If correction is necessary, rerun 
the job. 



80621 PARTITigN_TOO_SMALL 

Cause ; The size of the restore 
partition is less than that 
required by the copy program. 

This is probably a user error. 

Syste m Action : The job is 
cancelled. 



Ope rator Ac tion; Execute LISTIO 
tc check the assignments and then 
assign SYS006 to a card punch and 
rerun the job. 

If the problemi recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



80611 ERRORS IN C ONTR OL CARD 

Cause ; Errors were detected in 
the utility modifier card. 

This is probably a user error. 



System_ Action ; 
cancelled. 



The job is 



applicable. 



Not 



2E§i2LiO£_^2ii °2 • Allocate 
sufficient main storage for this 
application and rerun the job. 



80631 SYS006_NOT_ASSIGNED 

Cause: A card punch was not 
assigned to SYS006. 

This is probably a user error, 

System Actio n; The job is 
cancelled. 



Programmer Action; Correct the 
errors in the utility modifier 
card and resubmit the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action; Not applicable. 



80651 RESTORE EXTENTS NOT EQUAL TO COPY 

Cause: The EXTENT limits for the 
disk output file do not include 
the EXTENT limits for the disk 
input file. EXTENTS are all used 
fcr output file, but records still 
remain on input file. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Programmer Action : E xe c u te 
LISTVTOC and check the EXTENTS 
allocated. Increase or correct 
the restore EXTENTS so that they 
are equal to or greater than the 
copy EXTENTS. 

If the problem recurs, do the 
following to comiplete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Have the LISTVTOC output 
available. 



Appendix F. Operator Communication Messages Ibl 



Operator Action; Not applicable. 



80661 END OF COPY 



If the problem recurs, have the 
jcb stream, log sheet, and printer 
output available to complete your 
problem determination action. 



Cause ; Normal end-of-job 
indication. 



80711 INCORRECT_J[T_j__Ej__Mi_Ol_OPTION 



System A ctio n; Normal system 
processing continues. 

Programmer Action ; Not 
applicable. 

Operator Action; Not applicable. 



Cause; An invalid entry was made 
fcr the indicated parameter. 

This is probably a user error. 

§Y§t 6iI!_Ac t ion : The job is 
cancelled. 



80671 END OF RESTORE 

^3:y§§= Normal end-of-job 
indications. 

System Action; Normal system 
processing continues. 

Programmer Action; Not 
applicable. 

Operator Action; Not applicable. 



££23.£3.rrimer_Ac tion ; 
applicable. 



Not 



Operat or Action; Check for 
keypunch errors in the utility 
modifier card. If correction is 
necessary, rerun the job. 

If the problem recurs , have the 
job stream, program listing, log 
sheet, and printer output 
available to complete your problemi 
determination action. 



i068l CHECK_PCINT_BEING_TAKEN_FOLLOWING 
CARD NO. xxxxxx 

^§jyse: A checkpoint record is 
being written on SYS003 following 
the processing of the referenced 
card. 

System Action; Processing 
continues. 

E£23£§S!5!sr_Ac ti on : Not 
applicable. 

Operator Action; Not applicable. 



80701 INCORRECT CONTROL IDENTIFIER 

Cause; The control card is net 
properly identified. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Progra mmer A ction ; Not 
applicable. 

Operator Action; Check the 
// EXEC card for the correct 
utility name and check fcr 
keypunch errors in the identifier 
parameter of the utility modifier 
statement. 



80721 INCORRE CT FORM AT 

Cause: Incorrect parameter 
separation was used, or 

The parameter was punched 
incorrectly. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Programmer Action; Check for the 
indicated errors in the utility 
modifier statement and resubmit 
the job. 

If the problem recurs have the job 
stream and printer output 
available to complete your problem 
determination action. 

Operator Action; Not applicable. 



10731 INVALID LEADING ZERO IN_SIZE 
PARAMETER 



Cau se; Preceding zeros in A=(a) 
are invalid. 

This is probably a user error. 

System Action; The job is 
cancelled. 
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Proqram ir.er Actio n: Oirit the 
leading zeros in the A=(a) 
parameter and resubmit the job. 

If the problerr recurs, ha-ve the 
job stream, log sheet, and printer 
output available to ccirplete your 
problem determination action. 

Operator action; Not applicable. 



80211 INCORRECT_CHARACTER_IN_SIZE 
PARAMETER 

Cause; Only numeric values are 
acceptable in the A={a) parameter. 

This is probably a user error. 

System Action: The job is 
cancelled. 

Programmer Action: Check that 
only numeric values are used in 
the A=(a) parameter. Make the 
necessary corrections and resubmit 
the job. 

If the problem recurs, have the 
job stream, program listing, log 
sheet, and printer output 
available to complete your problem 
determination action. 

Operator Action; Net applicable. 



80751 A PARAMETER TCO_LARGE 

Cause: The A=(a) parameter 

exceeds the maximum value for the 
device. 



Device 


Record 


Prcbleir 




Size 


Program 




(in bytes) 


Area 


2311 


up to 3625 


lOK 


2314/2319 


up to 6400 


lOK 


2311 


up to 3625 


12K 


2314/2319 


up to 7294 


12K 


2314/2319 


up to 7294 


18K 


2321 


up to 2000 


lOK 



This is probably a user error. 

Sy stem Actio n;" The job is 
cancelled. 

Progra mmer Actio n: Reduce the 
A={a) parameter to the maximum 
permitted and resubmit the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



2£§£^t2£_^^ii°Ii • ^°^ applicable, 



80761 INCORRECT PARAMETER 



Cause: A character, other than 
the first, of a parameter in the 
utility modifier statement is in 
error. 

This is probably a user error. 



System Action; The job is 
cancelled. 

Program me r Act ion; Correct the 
parameter in error and resubmit 
the job. 

If the problem recurs, have the 
job stream, program listing, log 
sheet, and printer output 
available to complete your problem 
determination action. 

Operator Action: Not applicable. 



I077I DUPLICATE [A, I, M, T, E, Oj 
PARAMETER 



Cause; A second entry in the card 
began with one of the letters of 
an entry already processed. 

This is probably a user error. 

Syste m Action: The job is 
cancelled. 

Programmer Actio n: Correct the 
utility modifier statement and 
resubmit the jot. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action: Not applicable. 



i079I SI ZE_ PARAMETER MISSI NG o r [A, Tj 
PARAMETER MISSING 

Cause: The (a) within the 
required A=(a) was not specified, 
or 

The required F or V was not 
specified with the Tt parameter. 

This is probably a user error. 

gystem Action: The job is 
cancelled. 
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Programitier Action; Correct the 
utility control statement by 
providing the size parameter 
t(a)], or the A or T parameter. 
Resubmit the job. 

If the problem recurs, have the 
job stream, program listing, log 
sheet,, and printer output 
available to complete your problem 



Operator Action; Not applicable. 



Operator Action ; Not applicable, 



10831 DUPLICATE ENTRIES IN CELLS 
PARAMETER 



Cause ; The same cell number was 
specified more than once in the 
CELLS parameter. Duplicate 
entries are not permitted. 

This is probably a user error. 



^811 IPL OPTION INVALID FOR COPY VOLUME 

■CTlMOrpTriM 



System Action; The job is 
cancelled. 



Cause: The IPL parameter was 
supplied for the copy volume 
function. The parameter is 
treated as invalid since it may 
only be used for a copy file 
function. 

This is probably a user error. 

Syste m Actio n; The job is 
cancelled. 

Prog rammer Actio n; Oirit the IPL 
option in the utility modifier 
card and resubmit the job. 

If the problem recurs, do the 
following to complete your problem 
determination action; 

1. Have the job stream, program 
listing, log sheet and 
printer output available. 

2. Execute a stand-alone dump at 
the time of the failure and 
save the output. 

Operator Action; Not applicable. 



80821 UTILITY_MODIFIER CARD MISSIN3 

£§H§§= A utility modifier card 
was not supplied. 

This is probably a user error. 

Sy st em Action; The job is 
cancelled. 

Progra mmer Actio n; Supply a 
utility modifier statement and 
resubmit the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



Programmer Action; Supply the 
correct cell number and resubmit 
the job. 

If the problem recurs , have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



Opera tor Action; Not applicable. 



I084I EXCjESSIVE NUMBER OF CELLS 
PARAMETER ENTRIES 

Cause; More than five cell 
numbers were specified in the 
CELLS parameter. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Progr amme r Action; Correct the 
CELLS parameter so that it 
specifies five or fewer cells and 
resubmit the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action; Not applicable. 



^0851 CELLS MUST BE PROC ESSED INTHIS 
ORDER__^ jL 1 

Cause; Indicates the order in 
which cells were copied. 

System Action; Processing 
continues. 

Pjoar amme r .. A c ti on ; Not 
applicable. 
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Operator Action; Not applicable. 



81021 UTILITY MODIFIER CARD 



80861 EMULATOR PACK 



Cause ; Pack was initialized for a 
System/360 Model 30/40 or 
Systeni/370 emulator. 

This is probably a user error. 



Systeni Action ; 
cancelled. 



The job is 



Pro qr aitiiner Action; The applicable 
lUOO utility program must be used 
to copy emulator packs. If a 
restore is being done, a pack 
initialized for System/360 or 
System/370 must be used. 

Op era tor Action; Check that the 
correct input and output files are 
mounted. If correction is 
necessary, rerun the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



Initialize Disk and Data Cell Utility 
Messages 

The numeric values in the comments of these 
messages, represented by sm.all x's, are in 
hexadecimal notation. 



Cause ; This is an information 
only message. 

System Action ; The utility 
modifier control card parameters 
are listed following this message 
and processing continues. 



Pro grammer Actio n ; 
applicable. 



Not 



Operator Action; Not applicable. 



81031 INVALID CARD 



Cause ; The utility modifier 
statement was improperly 
identified. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Programmer Action ; Correct the 
utility modifier statement and 
resubmit the job. 

If the problem recurs , have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Ope r a to r Ac ti o n ; Not applicable. 



81041 INVALID FORMAT 



81011 SYSOOO NOT ASSIGNED TO A 2311 OR 
2314 

Cause; A 2311, 2314, or 2319 is 

not assigned to SYSOOO. 2314 is 

printed for both the 2314 and the 
2319. 



Cause; A required parameter on 
the utility modifier card is 
either missing or out of sequence. 

This is probably a user error. 

Syst em Ac tion ; The job is 
cancelled. 



This is probably a user error. 

Syst em Actio n; The job is 
cancelled. 

Programmer Action; Assign SYSOOO 
to a 2311, 2314, or 2319 and 
resubmit the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Actio n; Assign SYSOOO to 
a 2311, 2314, or 2319 and rerun 
the job. 



Programmer Action; Correct the 
utility modifier statement and 
resubmit the job. 

If the problem recurs , have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action; Not applicable. 



81051 INVALID PARAMETER 

Caus e; The parameter value in the 
utility modifier card is 
incorrect. 
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81061 



This is probably a user error. 

SYgteir Action: The job is 
cancelled. 

Programmer Action: Correct the 
utility modifier parameter in 
error and resubmit the jot. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determd nation action. 

Operator Action; Not applicable. 



INVALID USE OF S E NT RY IN INPUT 
OPTION 



Cause: The S entry in the input 
option parameter (that is, IS) 
indicates that surface analysis 
and RO generation are to be 
skipped. The error was caused by 
either: 

1. The Initialize Disk program 
cannot find a VOLl or Format 
4 label and assumes that the 
pack has not been 
initialized, or 

2. IS was specified while 
initializing an emulator 
pack. 

This is probably a user error. 

Sys tem Action: The job is 
cancelled. 

Progra mmer Actio n: Change the 
input option parameter or supply 
the correct disk pack and rerun 
the job. 

If the problem recurs, do the 
following to complete ycur problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Execute LISTVTOC for the 
subject volume and save the 
output. 

Operat or Actio n: Insure that the 
correct disk pack has been mounted 
and that the assignment is 
correct. If correction is 
necessary, rerun the job. 



Cause; The indicated alternate 
track is defective and will not be 
assigned. 

System Action; Processing 
continues. 



Pro grammer Action : 
applicable. 



Not 



Operator Action: Not applicable. 

8 1081 CYLXX, TR KXX, IS DEFECTIVE AND AN 
ALTERNATE IS ASSIGNE D 

Cause : The main area of the 
indicated track is defective and 
an alternate is assigned. 

System Action: Processing 
continues. 

Programme r Action : Not 
applicable. 

Operator A ctio n: Not applicable. 

81091 CYLxx, TRKxx, IS DEFECTIVE AND NO 
ALTERNATE IS AVAILABLE 

Cause; The indicated track is 
defective and no more alternates 
are available. 

This is possibly a hardware error. 

System Action: The job is 
cancelled. 



Programmer Action ; 
applicable. 



Not 



Ope rator Action; If the message 
81081 has occurred several times 
prior to this message, and: 

• The indicated track on all 
these messages is the same, 
the disk drive is probably 
defective. Move the disk pack 
to another drive and rerun the 
program. 

• The indicated tracks are 
random, the pack is probably 
defective. 

If the problem persists, do the 
following to com:plete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 



'iOII CYLxx, TRKxx, IS A DEFECTIVE 
ALTERNATE TRACK 



2. Issue the ROD command, 

execute EREP, and save the 
output. 
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illOI CYLxx, TR Kxx , HA or RECO ISIjj 
ERROR 



An EXTENT parameter is invalid or 
rrissing. 



Ca us e; The portion of the track 
where HA or Record is written is 
defective. 

This is possibly a hardware error. 



Syste m Acti on; The job is 
cancelled. 

Proqrairiner Action : Not 
applicable. 

Operat or Ac tio n; Mount a new disk 
pack and rerun the job. 

If the problem recurs, do the 
following to complete your problem 
determination action; 

1. Have the job stream, log 
sheet,, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 



8111A VTOC CARD MISSING 

Cau se ; VTOC card is missing cr 
incorrect. 

This is probably a user error. 

Sy st e m Action ; The system waits 
for an operator response. 

Progra mme r Action ; Insert or 
correct the VTOC card and resubmit 
the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operat or Action; Correct the 
card, place it in the reader, and 
ready the reader. Type 2 to 
continue processing, or 

Type any character other than 2 tc 
cancel the job. 

Defaul t Sy stemi A ction ; The jcb is 
cancelled. 



8112A VTOC ADDRESS INVALID 



Cause; The VTOC start address is 
invalid, or 



System Action; The system waits 
for an operator response. 



Programmer Ac tion ; Correct the 
VTOC control card, or correct or 
supply an EXTENT parameter and 
resubmit the job. 

If the problem recurs , have the 
jcb stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator A cti on; Correct the 
card, place it in the reader, and 
ready the reader. Type 2 to 
continue processing, or 

Type any character other than 2 to 
cancel the job. 

Defaul t S y stem Actio n; The job is 
cancelled. 



8113A VTOC OVERFL OWS CYLIN DER 

Cau se; Assigned VTOC area 
overflows the cylinder. 

This is probably a user error. 

System Action; The system waits 
for an operator response. 

Pro gr ammer Action ; Correct the 

jcb stream so that the VTOC area 

is one cylinder or less and 
resubmit the job. 

If the problem recurs, have the 
jcb stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action ; Correct the 
card, place it in the reader, and 
ready the reader. Type 2 to 
continue processing, or 

Type any character other than 2 to 
cancel the job. 



Defau lt Sys tem Act ion ; 
cancelled. 



8114A VOL CARD MISSING 



The job is 



Cause; VOLl card is missing, 
incorrect, or out of sequence. 

This is probably a user error. 
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Syst em Action ; The systeiti waits 
for an operator response. 



Programitier Action; Correct the 
placeinent, omission, or contents 
of the VOLl card and resubmit the 
job. 

If the problem recurs, have the 
job streaui, log sheet, and printer 
output available to complete your 
problem determination action. 



Ope ra tor Ac ti on; Correct the 
card, place it in the card reader, 
and ready the reader. Type 2 to 
continue processing, or 

Type any character other than 2 to 
cancel the job. 

Defau lt System Action; The job is 
cancelled. 



8115A V0L1_SERIAL_FIELD 

Cause; VOLl card has all blanks 
in the volume serial field. 

This is probably a user error. 

System Action; The system waits 
for an operator response. 

Programm er Actio n: Correct the 
VOLl card by completing columns 
5-10 and resubmit the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

QEgrator Actio n; Correct the 
card, place it in the card reader, 
and ready the reader. Type 2 to 
continue processing, or 

Type any character other than 2 to 
cancel the job. 

Default System Action; The jcb is 
cancelled. 



8116A YTOC_gR_END_CARD_ERROR 

Cause: A VTOC or END card is 
incorrect or an END card is 
missing. 

This is probably a user error. 

System Action; The system waits 
for an operator response. 



Programmer Actio n; Correct the 
VTOC or END card, or insert the 
missing END card. Resubmit the 
job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operato r Action : Correct the 
card, place it in the card reader, 
and ready the reader. Type 2 to 
continue processing, or 

Type any character other than 2 to 
cancel the job. 

De fa ult System Action; The job is 
cancelled. 



8117A PARAMETER DELIMITER 

Cause; A comma is missing after a 
parameter. 

This is probably a user error. 

System Action ; The system waits 
for an operator response. 

Programmer Action; Insert the 
missing comma and resubmit the 
job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator A cti on; Correct the 
card, place it in the card reader, 
and ready the reader. Type 2 to 
continue processing, or 

Type any character other than 2 to 
cancel the job. 

Default System Actio n: The job is 
cancelled. 



8118D UNEXPIRED FILE 

Cause; An unexpired file was 
detected on SYS 000. 

This is probably a user error. 

System Action: The system waits 
for an operator response. 

2£2a£aOin!§I_Ac ti on ; Check that the 
information on the unexpired file 
is not to be retained or 
substitute different extents. 
Resubmit the job. 
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If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available, 

2. Execute LISTVTOC for the 
subject file and save the 
output . 



Operator A.ction; Type 2 to 
continue the job and to delete 
this or any other unexpired file, 
or 



81221 LABEL CONTROL SET 



Cause; 



The label control cards 



are printed after this message. 

S yste m Action; Processing 
continues. 

Prog r ammer Action : Not 
applicable. 

Operator Action : Not applicable. 



I123I EMULATOR PACK, STANDA RD VTOC 
ASSUMED 



Type any character other than 2 to 
cancel the job. 



Defau lt System Actio n ; The job is 
cancelled. 



81201 END_gF_INIT_^ [DISK, DATA CELL] 

Caus e: Normal end of initialize 
disk or data cell program. 

System Action : The job is 
finished. 

Progra mmer Action : Not 
applicable. 

Operat or Actio n: Not applicable. 



Cause : A nonstandard VTOC has 
been specified for an emulator 
pack, although it requires a 
standard VTOC . 

System Action: Processing 
continues. Standard VTOC is built 
for emulator pack. 

Programmer Action : Not 
applicable. 

Operator Action: Not applicable. 



Alternate Track Assign Utility Messages 

The numeric values in the comments of these 
messages, represented by small x's, are in 
hexadecimal notation. 



81211 UNRECOVERABLE DISK ERROR 

Caus e : An unrecoverable disk 
error occurred while perfcrmdng 
surface analysis. 

This is probably a hardware error . 

System Actio n: The job is 
cancelled. 



82011 SYSOOO NOT A VALID DISK DRI VE 

Cause: A disk was not assigned to 
SYSOOO. 

This is probably a user error. 

Syst e m Action : The job is 
cancelled. 



Progra mme r Action : Not 
applicable. 

Op era t or Actio n: Mount another 
disk pack and rerun the jcb. 

If the problem persists, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 



Programmer Action ; 
applicable. 



Not 



Operator Action; Assign SYSOOO to 
a disk drive and rerun the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



82031 INVALID CARD 



2. Issue the ROD command, 

execute EREP, and save the 
output. 



Cause: The utility modifier 
statement is improperly 
identified. 
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This is probably a user error, 



Operator Action; Not applicable, 



System Action: The job is 
cancelled. 



82 071 UTILITY MODIFIER CARD 



Programitier Action; Correct the 
utility modifier statement and 
resubmit the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



Operat or Actio n; Check the // 
EXEC statement against the utility 
modifier card for the correct 
program. Correct the utility 
modifier statement and rerun the 
job. 



82051 INVALID_FgRMAT 

Cause; A parameter is missing or 
out of sequence. 

This is probably a user error. 

Syste m Actio n; The job is 
cancelled. 

Progra mmer A ctio n ; Not 
applicable. 

Operator Action; Correct the 
utility modifier card and rerun 
the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



82061 I NVALID PARAMETER 

23,use: A parameter in the utility 
modifier statement was incorrectly 
specified. 

This is probably a user error. 

S ys te m Actio n; The job is 
cancelled. 

Programmer Action; Correct the 
parameter value in the utility 
modifier statement and resubmit 
the job. 

If the problem recurs, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 



Cause; The control card 
parameters are listed following 
this message. 



System Ac tio n; Processing 
continues. 

Programmer Actio n: Not 
applicable. 

Operator Action: Not applicable. 



82101 FORMAT 4 LABEL MISSING 

Cau se: The VOLl label contains 
the address of the VTOC, but no 
Fcrmat 4 label can be found at 
that address. 

This is possibly a hardware error. 

System Action: The job is 
cancelled. 

Programmer Actio n: Recreate the 
file on another disk pack or data 
cell, or reinitialize this disk 
pack or data cell and recreate the 
file. 

If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 

3. Execute LISTVTOC for the 
subject volume and save the 
output . 

Operator Action: Check that the 
proper disk pack or data cell has 
been mounted. If not, mount the 
proper volume and rerun the job. 



82111 VQLUME_LABEL MISSING 

Cause; The volume label is always 
record 3 of cylinder 0, track 
for a disk, or record 3 of subcell 
0, strip 0, cylinder 0, track 
for a data cell. The volume label 
cannot be found at this location. 
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System Action; The job is 
cancelled. 



Progr airiTier Actio n; Reinitialize 
the disk pack and recreate the 
file. 

If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
avilable. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 

3. Execute LISTVTCC for the 
subject volume and save the 
output. 

Opera tor_Action: Check that the 
proper disk pack or data cell has 
been mounted. If net, mount the 
proper volume and rerun the jcb. 



82121 DATA_CHECK_IN_LABEL 

Caus e; A data check occurred in 
the count field while reading a 
label. 

This is probably a hardware error. 

Syst em Action; The job is 
cancelled. 



Sy st em Action; The system waits 
for an operator response. 

Programmer Actio n: If the error 
recurs, recreate the file on 
another disk pack or data cell and 
reinitialize the subject volume. 

Opera t or Ac tio n: Type a 2 to 
continue processing, or 

Type any character other than 2 to 
cancel the job, or 

Mcunt the pack on another disk 
drive and rerun the job. 

If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream., log 
sheet, and printer output 
available. 

2. Execute a stand-alone dump at 
the time of the failure and 
save the output. 

3. Issue the ROD command, 
execute EREP, and save the 
output. 

4. Execute LISTVTCC for the 
subject volume and save the 
output . 

Def ault System Act ion : The job is 
cancelled. 



Progra mmer A ction: If the problem 
recurs, the file should be 
recreated on another disk pack or 
data cell and the subject volume 
should be reinitialized. 

Oper a t or Actio n; Rerun the job. 

If the problem recurs, do the 
following to complete your problem 
determdnation action; 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 



82130 FORMAT H LABEL ERROR 

Cause; An error occurred while 
reading a Format 4 label. 

This is probably a hardware error. 



82140 VOL UME LABE L ERR OR 

Cause; An error occurred while 
reading a volume label - 

This is probably a hardware error. 

System Action; The system waits 
for an operator response. 

Programme r Action; If the problem 
recurs, recreate the file on 
another disk pack or data cell and 
reinitialize the subject volume. 

Oper a tor Action; Type a 2 to 
continue processing, or 

Type any character other than 2 to 
cancel the job, or 

Mcunt the pack on another drive 
and rerun the job. 

If the problem recurs, do the 
following to com^plete your problem 
determination action: 
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1. Have the job streair, log 
sheet, and printer output 
available. 

2. Execute a stand-alone duirp at 
the time of the failure and 
save the output. 

3. Issue the ROD command, 
execute EREP , and save the 
output. 

Default System Actio n; The job is 
cancelled. 



82151 ALT CYLS FULL 

Cause : No more alternate tracks 
are available for assignirent. 

Syst em Actio n: The job is 
cancelled. 

Progra mmer Action : The file 
should be recreated on another 
disk pack, or 

This pack should be initialized 
and a complete surface analysis 
performed before rebuilding the 
file. 

If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP , and have the 
output available. 

Operator Action: Not applicable. 



82161 CYLxx_t_TRKxx_REC0_IN_EFROR 

Cause: The portion of the track 
on which record is written is 
defective. 

System Action; The job is 
cancelled. 

Programmer Action; The file 
should be recreated on another 
disk, or 

The subject pack should be 
reinitialized and the file should 
be rebuilt. 

If the problem recurs, do the 
following to complete your problem 
determination action: 



1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command,, 
execute EREP, and save the 
output. 

3. Execute the disk to printer 
utility for the record in 
question. 



Operator Action; Not applicable. 

82201 cccchhhhrrkkdddd 

Cause ; If there are no errors, 
the eight byte count field is 
printed in hexadecimal as each 
record is transferred. 

c= cylinder 
h=head 
r= record 
k=key 
d=data 

Sy stem Ac t ion : Processing 
continues. 

Programme r Action ; Not 
applicable. 

Operator Action: Not applicable. 

82211 ALT TRK ASSIGNED NOT ACCESSIBLE 

Cause; The HA and RO area 
designated is defective. The 
alternate track is not accessible 
for the valid data. 

This is possibly a hardware error. 

System Ac ti on; The job is 
cancelled. 

Programmer Action; The file 
should be created on another disk 
pack or data cell, or 

This disk pack or data cell should 
be initialized and the file 
recreated. 

If the problem recurs , do the 
following to complete your problem 
determination action; 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 
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Op erator ?^c tign; Not applicable. 



82221 HA AND RO ARE DEFECT IV E 

Caus e; The HA and RO areas are 
defective. An alternate track was 
not previously assigned, and 
therefore all the records will be 
printed on SYSLST regardless of 
print option. 



If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 



System Action: Processing 
continues* 

Progra mmer Action; Recreate the 
file on another disk pack or data 
cell,, or initialize this disk pack 
or data cell. 

If the problem recurs, do the 
following to complete your problem 
determination action: 



Operator Action ; Not applicable, 



82251 DATA CHECK IN COUNT FIELD 



Cause ; A data check has occurred 
in the count field. The record is 
not transferred to the alternate 
track. 



1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 

Operatgr Action: Not applicable. 



System Action ; 
continues. 



Processing 



Programmer Action; If this error 
affects the use of this file, 
recreate the file on another disk 
pack or data cell, or initialize 
this disk pack or data cell and 
recreate the file. 



82231 ALT TRK PRE VIOUS LY ASSIGNED 

Cause: The HA and RO areas 
designated are not defective. The 
alternate track was previously 
assigned; therefore, data will be 
transferred to a new alternate 
track. 

Sys tem Action : Processing 
continues. 

Programmer Action : Not 
applicable. 

Operator Action: Not applicable. 



82241 HA AND RO OF ALT TRK IS DEFECTIVE 

Cause: The HA and RO area of the 
previously assigned alternate 
track is defective. The data 
portion of RO will not be 
transferred, but other records may 
be recovered. 



System Action : 
continues. 



Processing 



P rogrammer Action ; Recreate the 
file on another disk pack or data 
cell and recreate the file. 



Op er ator Action; If the problem 
recurs, issue the ROD command, 
execute EREP, and have the output 
available to complete your problem 
determination action. 



82261 NO ADDRESS M ARKER 

Cause; An address marker is 
missing. The record is not 
transferred to the alternate 
track. The pack was not properly 
intialized before the file was 
built. 



System Ac tion ; 
continues. 



Processing 



Pro gr amme r Action; Recreate the 
file on another disk pack or data 
cell, or initialize this disk pack 
or data cell and recreate the 
file. 

Opera t or Action: If the problem 
recurs, issue the ROD command, 
execute EREP, and have the output 
available to complete your problem 
determination action. 



82271 KEY AND DATA ERROR RECOVERED 
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Cause: The key and data portion 
of this record was recovered, but 
is possibly in error. The record 
is forinatted as read. 



Operator Action; Not applicable. 



82291 KEY MAY BE IN ERROR 



System Action ; 
continues. 



Processing 



Programiner Action; Check the key 
and data portion of the records 
transferred. If the problerr 
recurs, the file should be 
recreated on another disk pack or 
data cell, or this disk pack or 
data cell should be initialized 
and the file recreated. 



Note; The value in Register 1, 
plus 9 and 10, is the failing 
cylinder and head. 

Operator Action; Rerun the job. 

If the problem recurs, do the 
following to complete your problem 
determination action; 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 

3. Use the address supplied by 
your installation programmer 
in the disk or data cell to 
printer utility to display 
the failing track and have 
the output available. 



82281 KEY AND DATA ERROR 

Cause: The key and data portion 
of this record cannot be 
recovered. The record is 
formatted with EBCDIC [A] fill 
characters. 



Cause; There is a possible error 
in the recovered key. The data 
field was not recovered. The 
record is formatted as read with 
the data field filled with EBCDIC 
[A] characters. 



System Action ; 
continues. 



Processing 



Pro grammer Action: Check the key 
fcr validity. Create the file on 
another disk pack or data cell, or 

Initialize this disk pack or data 
cell and recreate the file. 

If the problem recurs , do the 
following to complete your problem 
determination action; 

1. Have the log sheet and 
printer output available. 

2. Execute a stand-alone dump at 
the time of the failure and 
have the output available. 

3. Use the disk or data cell to 
printer utility to display 
the failing track. 

Not e; Use the dump to find the 
track in error. The value in 
register 1, plus 9 and 10, is the 
failing cylinder and head. 

Ope rator Action; Not applicable. 



82301 UNRECOVERABLE ERR OR 

Cause; An unrecoverable error has 
occurred, other than missing 
address marker, data check, or 
record overflow. 



System Action; Processing 
continues. 

Programmer Action; Create the 
file on another disk pack or data 
cell, or 

Initialize this disk pack or data 
cell and recreate the file. 

If the problem recurs have the log 
sheet and printer output available 
to complete your problem 
determination action. 



This is probably a hardware error. 

System Action; The job is 
cancelled. 

Programmer Action ; Not 
applicable. 

Operator Action; Rerun the job 
and assign another pack. 

If the problem recurs, do the 
following to complete your problem 
determination action: 
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1. Have the job strearr, log 
sheet, and printer output 
available. 

2. Issue the ROD coirirand, 
execute EREP, and save the 
output- 



2. Issue the ROD cortiitiand, 
execute EREP, and save the 
output. 

3. Execute a disk or data cell 
to printer utility for the 
record in question and save 
the output. 



82311 CYLxx_^_TRKxx, IS DEFECT I VEj__A,N 
ALTERNATIEIS ASSIGNED 



82341 UNRECOVERAB LE DI SK ER ROR 



Cause: The track is permanently 
defective and an alternate is 
assigned. 

Syst em Ac tion; Processing 
continues. 

Pro g rammer Actio n : Not 
applicable. 

Ope rator Actio n; Not applicable. 



32321 CYLxx, TRKxx , IS NOT_DEFECTIVE 

Cause; The track is acceptable. 

Syste m Action ; Processing 
continues. 

Progr ammer Action ; Not 
applicable. 

Operator Action; Not applicable. 



!233I CYLxXj._TRKxXj_iA_AND_RO_ARE 

DEFECTIVE^_Ng_ALTERNATE_ASSIGNED 



Cause: The HA and RO portion of 
the track is defective. An 
alternate track cannot be 
assigned. 

This is probably a hardware error. 

Syste m A ction; The job is 
cancelled. 

Programmer Action; If the problem 
persists, the file should be 
recreated on another disk pack or 
data cell, or this disk pack or 
data cell should be initialized 
and the file recreated. 

Oge ra t or_Ac t ion ; Rerun the job. 

If the problem recurs, do the 
following to complete your problem 
determination action; 

1. Have the job stream, log 
sheet, and printer output 
available. 



Cause; An unrecoverable disk 
error occurred while performing 
surface analysis. 

This is probably a hardware error. 

Sy st em Action; The job is 
cancelled. 

Programmer Action; Recreate the 
file on another disk pack or data 
cell, or initialize this disk pack 
or data cell and recreate the 
file. 

Operator Action: Rerun the job. 

If the problem recurs, do the 
following to com:plete your problem 
determination action; 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 



i235l DATA_TRAN§F1E5ED_T0_0RGINAL 
DEFECTIVE TRACK 

Cause; The track was found 
acceptable, and the data was 
returned to the original track. 

System Ac tion; Processing 
continues. 

Prog_rammer Ac tio n ; Not 
applicable. 

Ofier a tor_Ac ti on : Not applicable, 



i236l DATA_TRANSFERRED_TO_ORIGINAL 
ALTER NATE TRACK 

Cause; The alternate track is 
acceptable, and data was 
transferred. 

Syst e m Ac tion; Processing 
continues. 
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Progra mmer Action : Not 
applicable. 

9E§£atgr_Action: Not applicable. 



82401 END OF ALT. TR K. ASS G N 

C aus e: Normal end-of-job 
indication. 

System Action; Normal system 
processing continues. 

Programm er Actio n : Not 
applicable. 

Operator Action; Not applicable. 



82501 END_OF_ALT^ TRK_^ AND UPDATE 

Cau se ; Normal end of job. 

Syste m A ction; Normal system 
processing continues. 

Progr ammer A ction : Not 
applicable. 

OE§I§tor_Act ion : Not applicable. 

12511 TRACK_PARAMETER_MISSING 

Cause; UY was specified en the 
utility modifier card, but TRACK= 
was not in the first six columns 
of the track statement. 

This is probably a user error. 

System A ction ; The job is 
cancelled. 

Programmer Action; Insert the 
TRACK Statement or specify UN. 
Resubmit the job. 

If the problem recurs, have the 
job stream, log sheet,, and printer 
output available to complete your 
problem deterirination action. 

Oggrator Action; Not applicable. 

§2521 INVALID TRACK_STATEMENT 

Cause; The characters in the 
TRACK statement are not valid 
hexadecimal characters, or the 
TRACK statement and data are 
missing entirely (with UY 
specified) , or the quantity of 
data supplied is less than the 
amount specified on the TRACK 
statement. 



This is probably a user error. 

S^^'Stem Action: The job is 
cancelled. 

Progr amme r Action; Correct the 
invalid TRACK statement and 
resubmit the job. 



v^^^Ki ^. 



;iii ic«^ UJ.S3 , 



lid ve txie 

job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action; Not applicable. 



82531 UPDATE RECORD CAUSES TRACK 
OVERFLOW 

Cause ; Track capacity was 
exceeded when attempting to write 
update record. The last record on 
the track may now be invalid. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Programmer Action; Check the 
validity of the record that caused 
the overflow. If subsequent use 
of the file will be affected, the 
invalid record will have to be 
removed or the file recreated. 

If the problem recurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Execute the file to printer 
utility for the record in 
question and have the output 
available. 

Operator Action; Not applicable. 



82561 NOT_AN EMULATOR PACK 

Cause; An UPSI 00000001 card was 
present, and the pack to be 
cleared was not initialized for 
emulator use. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Programmer Action; Remove or 
correct the UPSI card if the pack 
is not to be used for an 
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emulator, or 

Initialize the pack correctly for 
emulator use. 

If the problem recurs, have the 
job stream,, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action: Check that the 
correct disk pack is mounted. If 
correction is necessary, rerun the 
job. 



1 3031 CELLx x. SUBCELLxx, S TRIPxx, CYLxx, 
TRKxx I S A DEFECTIVE ALTERNATE 
TRACK 

Cause : The alternate track is 
defective and will not be 
assigned. 

System Actio n: Processing 
continues. 

Prog ra mmer Actio n : not 
applicable. 

Operator Action : Not applicable. 



83011 SYSOOO NOT ASSIGNED T O A 23 21 

Caus e: A data cell was not 
assigned to SYSOOO. 

This is probably a user error . 

System Action; The job is 
cancelled. 

Pro grammer Action ; Correct the 

job stream so that SYSOOO is 

assigned to a data cell and 
resubmit the job. 

If the problem recurs,, have the 
job stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Ope rator Actio n; Assign SYSOOO to 
a data cell and rerun the job. 

83021 UNRECOVERABLE DATA CELL ERROR 

Cause; An unrecoverable data cell 
error occurred while performing a 
surface analysis. 

This is probably a hardware error. 

System Action; The job is 
cancelled. 

Progra mmer Actio n : Not 
applicable. 

Opera tor A ction; Mount another 
data cell and rerun the job. 

If the problem recurs, do the 
following to complete your problem 
determination action; 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output. 



J304I CELLxx, SUBCELLxx, STRIFxXy CYLxx, 
TRKxx IS D EFECTIVE AN D A N 
AL TERNATE IS ASSIG NE D 

Cause; The main area of the track 
is defective and an alternate is 
assigned. 

Syste m Act ion; Processing 
continues. 



Progr ammer Action ; 
applicable. 



Not 



Operator Action: Not applicable. 



83051 CELLxx, SUBCELLxx, STRIPxx, CYLxx, 
TRKxx IS DEFECTIVE AND NO 
ALTERNATE IS AVAILABLE 

Cause; The track is defective and 
no more alternate tracks are 
available. 

This is possibly a hardware error. 

Sys tem Action; The job is 
cancelled. 



P rogr ammer __Ac t ion ; 
applicable. 



Not 



Opera t or Action ; Mount another 
data cell and rerun the job. 

If the problem persists, do the 
following to com-plete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output . 



83 061 CELLxXjj__SUBCELLX2Lt_STRIPxXi__CYLxx_L 
TRKxx HA OR RO IS IN ERROR 
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Q§:JJ§§= The HA or RO portion of 
the track is defective. 

This is possibly a hardware error, 



System Act ion; The job is 
cancelled. 

Proqramin er Action; Not 
applicable. 

Operator Action; Mount another 
cell and rerun the job. 

If the probleir persists, do the 
following to complete you problem 
determination action: 

1. Have the job stream, log 
sheet, printer output 
available. 

2. Issue the ROD command, 
execute EREP, and save the 
output . 



83071 END OF INIT DATA CELL 



Cause; The portion of the track 
where record data field is 
written is defective. 

This is probably a hardware error. 

System_ Action ; The job is 
cancelled. 

Programmer Action: If the problem 

persists, the file should be 
recreated on another disk pack or 
data cell, or this disk pack or 
data cell should be initialized 
and the file recreated. 

Operator Action; Rerun the job. 

If the problem persists, do the 
following to complete your problem 
determination action: 

1. Issue the ROD command, 
execute EREP, and have the 
output available. 

2. Have the log sheet and 
printer output available. 



^^i^^e: Normal end of initialize 
data cell program. 

System Action: Noriral system 
processing continues. 

P£23£§lD2!6r_Ac tion : Not 
applicable. 

Operator Action: Not applicable. 



:310I CELLxx^_SyBCELIiXX^_STRIPxXi_CYLxXj, 
IiKxXj_IS_DEFECTIVEj__ALTERNATE_IS 
ASSIGNED 

Cause: The track is permanently 
defective and an alternate is 
assigned. 

System Action: Processing 
continues. 



83081 SYS000_NOT_A_VALID_DATA_CELL 

£§jyse: The device assigned to 
SYSOOO is not a data cell. 

This is probably a user error. 

System Action; The job is 
cancelled. 

Programmer Action : Not 
applicable. 

Opera tor Actio n; Execute LISTIO 
to get the current assignirents, 
assign SYSOOO to a data cell, and 
rerun the job. 

If the problem recurs, have the 
LISTIO output available tc 
complete your problem 
determination action. 



83091 CELLxXj;_SUBCELLxx^_STRIPxx^_CYLxXi 
TRKxx RECO IS IN ERROR 



Program me r Action ; Not 
applicable. 

2£er a to r_Ac t ion : Not applicable. 



13111 CELLxx^_SyBCELLxXj__STRIPxx_L_CYLxXj 
TRKxx IS NOT DEFECTIVE 

£SH§§= The track is acceptable. 

System Action: Processing 
continues, 

Pgogj^am mer Actio n : Not 
applicable. 

Operator Action: Not applicable. 



[3121 CELLxXj__SyBCELLx2LL_STRIPxXi_CYLxXj. 
31Kxx_HA_AND_R0_ARE_DEFECTIVE^_NO 
ALT. ASSIGNED 



Cause; The HA and RO portion of 
the track is defective and an 
alternate track cannot be 
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assigned. 

This is probably a hardviare error. 

Sygtein Acti on; The job is 
cancelled. 

P r ogr an!itier_Action : If the problem 
recurs, the file should be 
recreated on another disk pack or 
data cell, or this disk pack or 
data cell should be initialized 
and the file recreated. 

Opera tor Action; Rerun the job. 

If the probleir recurs, do the 
following to complete your problem 
deterrri nation action: 

1. Issue the ROD coirirand, 
execute EREP, and have the 
output available. 

2. Have the log sheet and 
printer output available. 



Initialize Tape Message 



8601A MORE PASSES NEEDED — INTTP 

Cause: If the CARD and REWIND 
parameters are omitted, the 
program waits for a reply to 
initialize another tape. 

System Action: The system waits 
for an operator response. 

Progr ammer Actio n : Not 
applicable. 

Opera tor Actio n; Reply YES if you 
want to initialize another tape. 
Reply NO or (B) to terminate the 
job. 

Note; See Appendix D for more 
initialize tape messages. 



This is probably a hardware error. 

System Action; The job is 
cancelled. 

Programmer Action; Assign another 
disk pack or data cell, or 
initialize this disk pack or data 
cell and resubmit the job. 

If the problem recurs, have the 
jcb stream, log sheet, and printer 
output available to complete your 
problem determination action. 

Operator Action: Not applicable. 



8^921 NO_VOL[JME 1 LABEL FO UND. JOB 

CANCELLED 

Cause: The VOLl label is cylinder 
0, head 0, record 3, for a disk, 
or subcell 0, strip 0, cylinder 0, 
track 0, record 3 for a data cell, 
when the device has been 
initialized. A record has been 
found at this address, but it is 
not the VOLl label. 

This is probably a user error. 

System Action; The job is 
cancelled. 



Programmer Action ; 
applicable. 



Not 



8V93I 



Opera tor Action; Check the device 
assignment and that the correct 
disk pack or data cell has been 
ircunted. If correction is 
necessary, rerun the job. If the 
assignment and device are correct, 
initialize the disk pack or data 
cell and rerun the job. 

If the problem recurs, have the 
jcb stream, log sheet, and printer 
output available to complete your 
problem determination action. 



JOB 



VTOC Display Messages 



8V91I Ng_F0RMAT_4_LABEL_FCUND^ JOB 

CANCELLED 

Cause; The VOLl label (cylinder 
0, head 0, record 3) contains the 
address (cylinder, track, and 
record) of the Format 4 label. A 
record has been found at this 
address, but is not a Format 4 
label. 



INVALID VTO C ADDR FO UND. 
CANCELLED 

Cause: The VTOC address in the 
VOLl label is less than cylinder 
0, head 0, record U, or is equal 
to or greater than cylinder 2 00, 
head 0, record 0. This is 
probably a user error. 



Syste m Action ; 
cancelled. 



The job is 



Progr ammer Actio n : 
applicable. 



Not 
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Operator Actio n; Assign another 
disk pack or initialize this disk 
pack and rerun the job. 

If the problem recurs* have the 
job stream,, log sheet, and printer 
output available to complete your 
problem determination action. 



CANCELLED ' 

Caus e; A disk pack has been 
mounted that was not initialized 
or a hardware error has occurred. 

CtTCi-l-QTTl A /-•■I- -i /-.■.-. 



cancelled. 



Programmer Action : Not 
applicable. 

Operator Action; Check that the 
pack has been initialized. If 
not, initialize it and rerun the 
job. If the pack has been 
initialized, move it to another 
drive and rerun the job. If the 
job executes normally, the 
original drive is malfunctioning. 

For a disk drive malfunction or 
persistant errors, issue the ROD 
command, execute EREP, and have 
the output available to complete 
your problem determination action. 

8V95I NO T A VALID LABEL FORMAT 

Cause; A label other than type 1, 
2, 3,, 5, or X'OO' was encountered 
after the Format 4 label was 
processed. 



System Action ; 
continues. 



Processing 



Programmer Action; Check byte 45 
of all labels for one of the valid 
format identifiers. 



Operator A ction ; Execute the 
LISTVTOC program and give the 
output to the programmer. 

8V96D FORMAT 1 LABEL OF DATA SECURED 



Cause; A Format 1 label 
describing a data secured file has 
been read by the VTOC Display 
utility program. 

System Act ion ; The system waits 
for an operator response. 

Programmer Action ; Instruct the 
operator what to reply when this 
message is issued. 

If a failure occurs, do the 
following to complete your problem 
determination action: 

1. Have the job stream, log 
sheet, and printer output 
available. 

2. Execute a stand-alone dump at 
the time of the failure. 

Operat or Action ; Reply YES to 
allow the label information of al l 
data secured files to be listed 
along with the rest of the label 
information in the VTOC. 

Reply NO or® to allow only the 
label information pertaining to 
unsecured files to te listed. 

Any other response results in an 
invalid response message. 
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